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ismot elkezdrjdott egy tanev Talan 
aze rt is kerdezgettek most an a ban 
tobben as tobbfele hantJSLi I lyal , hogy 
mi* kiuan a BIT-LET az uj tanevre 
a diakoknak es a tanaroknak. s hogy 
mit klv^n nyujtani a BIT LET az uj 
taneuben n diakoknak es a lanarok 
nek? Mt>s, hat a szerkeszTd ugy 
gondolta. hogy megprtibalja 
nahanv sorbafi osszefogtalni rigi 
es oj vesszoparipaiL megprohalja 
megfogalmazni a sza mitastechnika 
oktatasaval kapcsolatos kerdojeleit 
es f eJkiaK6jelart 

Elsoken*. aajnos miig mmdig azokkal 
az ibkrjldkkal kellene foglalkoxnia 
a? oktatasiigy f eieloseinek. 
arnelyekben a szarnitogep mindrneig 
nam nyerte eJ megfelelo heJyel- 
Elinlezhetjuk persze egy kez • 
tetjymiessel azokat az igazgatdkat. 
akik szamara meg mindig egy ertekes 
leUari targy a szamitogep, 
amalynek a legjobb helye valamely 
zart s^efcrenyben van Elintezhelnenk 
ha nam tudn£nk, hogy ma mar 
ha I iBtannek on tartunk, hogy 
a: diak. aki nam uikitkozik a # A V* 

& £a ml tog appal a felsooktaiagi szinte *%* 
minden leniteten heiyzeli hatranyba , m *• < 

kerul azokkal szemben, aktknek » 
termeszetes dolog a geppet valo 

banes, akik tehat altelanos muvelt5egijk reszekent birtokoU 
jak a tud*st. amely a szimitogep felhaszfiSlasahoz kell- 46 
lenne tehat, ha vegre nam inteznek el az ygyet kezlegy intessel 
mmdazok. akik tehetnek valamit. mindazok, aktknak lehato- 
saga frs koteless^ge, hogy raszoritsik a fafejuekeT, hogy iHh 
gyek Ki zsebukbfil a ktiicsot, a adjak dt a gepet a diSfcok- 
nek, 

Mosoclik kivansagkanl egy vagyatmunkat fogalmazzuk meg. 
miazerint tanuljsk meg vegre a gepek kazeleset, haaznalata 
nak tehetoseget azok a pedagogusok fa. akiknek sernrni kdzOk 
a matematikehoz, lizikaho*. sanmitAstachnikiho^ S ami 
ugyszintfn elangedhetetlen felteiale a azemlaletvaTtoz&snak< 
iiogv leg yen nur-ei Lebb yet* leg yen log;*Llhh 15-20 di^krjn 
ken l egy masina m kozapiskolakban Alom mondhetjak az 
olvasok. Da ha ez a szem ma meg az is. az mar teny, stalls*- 
tikak hizonyiijak. hogy azonos anyagi adousdgokkal t&n- 
de^kezo iskolak, virosok, unegyek szimitogepelldiottsaga 
kozdtt hatalmas alteresek vann&k, s ezek az afterasek agy- 
azarGen csakarra vezethat ok visaza. hogy itt ugynek tekmtik 
a dolgot. amott meg inkatob maara - fonlosabb vagy kevosb6 
fontosabb ugyekre - koltik ugyanazl a penzt. Apropos, p^nz. 
Ivlostanaban egyre kava^ebben ^rtik, hogy hoi i& van az a 
panz, amelybol a kbvetkezd ewakben az iskolnk gapparkja 




gyarapDdhat, Amig kozponf ilag 
oaztotiak szet ezekel az anya 
Qaiakal, addig mindenki tudta.hogy 
hoya vesse yigyazo sz erne it Ma 
amikor tal^in boJyes olgondolasbbi 
sz^toE-ztottM a penz egy tekintelye^ 
r^azetx a szdmitastechnLkai oklatbk 
attbl tartanak - talan nam is 
alaptalanul , hogy a penz egy 
rasza a megyei kasszaban iranyt 
vittoztat. 

Kivanjuk m^g tarmeazetesen azl is, 
a mit epp egy eve irtunk le ugybn 
czcken a hasabo^on. hogy a diakok- 
nak ne caak kicsiny resze talalkozzon 
I a szarmtogepakkal. De amellett. 
I hogy a tag/ohbak kivato programo- 
; kat ir nak legyen kiforrott mddszere 
fis beyalt utja annak is, hogy minden 
diak talalkozzon a geppel Ismenfi 
meg a kezeles mikentjet, tanuljon 
rolfl annyit, amennyi ahhoi kail, 
hogy ne Jeljen a gepaktol. s ertse 
1 mikent kommunikal az ember a? a 
f j gep d mike n l teszi ezt a buta h osak 
egyeket nullakat erio gep. amit 
kaza!oia kivin tole 
mm m S mit kWanunk magunknak erie 

mi taitevre > Szeretnenk hasznos 
ff^fc * * * sagltfii lenni tov£bbra is a szak - 

■^Jpl _ - m ** korofcfiak, szeretnank ha lanarok 

'v. es diakok aciyarant sziveaen for 

gaSak lapjainkfli.Tarvezzuk, hogy megujitiiik es ujraaUandd 
rovaiunkkent kezeliiik a Sorvezatot. ameiy telan reg^bbi 
pedagogics olvaspink mag amfekeznek ri - kifejeienan az 
iakolai szakkorok munkejahoz kivant segttseget adni Hogy 
mi lesz bonne, hogy m* legyen benne, abbe )6 lenno ha azok 
is beres^olnAnak - tudatva veliink eikepzelasaiket - akiknak 
azanjuk a rovatot, 

No as termeszetesen szeretnenk, ha a lap kasziteseban prog- 
ramjaikkel f blfedezeseikkel tovabbra is reszt uennenek ma- 
guk a diakok is. EgyHer mar meghifdetciik. most tijra tesszuk, 
hogy nagyon szive«en kbzolnenk diakok. szakkdrvezeto dia 
kok Ir^sait art 61. bogy Sk hogyan oktatnak, szertntiik mi a leg- 
ceiravezetobb mddszer, tematika a programozas vagy a 
S2amlt6gep-haszn«lat tanitasaban. 

Fentiek caak hevenyeszett goodoJatok. de tigy gondoljuk nem 
^rt- ha idonkent egy szarkesztoseg namcsak bnmaga wamara 
gondo1|a v&gig. hogy mit klvan tenni vagy mit t?rtena kiva- 
natos dliepotnak a lap ..kbrnyazaiat" jalento kerd6sektian r 
N cm art ha neha a 3zerkeszt6kesazaltfes6fc egym^s szemebe is 
ntondjak. hogy m*t gondolnak egymasrol. Ne feledjek bnok 
is megmondhat^ak ! 



^ Hirotdal- amelybtfl azt ts megtudhatiak. hogy hogyan lehet partnert talalni . 
@ Program a/an/at Zene a ZX Spectrumra 

@ Notes* - egy masik Spectrum-program, amely Gepnyero paly^zatunk els6 fordu!6jara erkezett 
© Els6 ktzbbl a tv -computer rot - elozmeny a mult havi szamban, folytatas fegkozelebb 

O Primo-6lt2 6vet... igyekeztunk kideritenl hogy mi van a pletykak mogott s hogy lesz-e szines Primo vagy sem? 
© Programajanfat - Cm 1 1 betuk a Pnmon 

© Hasznos aprosSgok a C16-ra - nehar.y POKE a 64'ER-bol; egy kis adalek a kisfelbontasu grafikarol irott cikkunkhoz 

© Konyvmoly - az ujonnan megjelent konyvek iistajaval. egy Spectrum konyv egy modszeres programozast tanito konyv kntikajaval 

© Posta - amelyben visszaterunk egy regebbi Primo tablazathoz. valamint vataszolunk egy TVC programozd kerdeseire 

© Harmadgepnyero 3. feladat amelyben BIT-LET szigetere latngatunk , 
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Mubort. illetve mesterseges bdrt fejlesztettek 
ki az egyik robotokkaf foglalkozd nyugat- 
n6met val[alatn£l. A muanyagba Sgyazott 
aprd femgombok, vagy vezetdkepes mu- 
anyag szemcsek lehetfive teszik, hogy a robot 
megfogd szerkezete (,,keze") tapint3sa>a er- 
z^keljen, es azt kdvetden vegezze feladatSt 
Az uj elven mukdd<5 robotok sz£mos esetben 
jobban lesznek afkalmazhatdk, mint az optikai 
erzekeles alapjSn mukdddek. 



A PCW 8256 teljesen megfelel a szovegfel- 
dolgoz^si igenyeknek. A nagy felbont^su 
kepemydn 90 leuteses, 32 soros szdveg dol- 
gozhaTo fel. A kepernyS felulete mintegy 
negyven szazalekban jobban kihasznalhatd, 
mint mas mikroszamftdgepeknel. A beepitett 
nagy sebessegu RAM diszk az adott doku- 
mentum szerkeszt£se kozben lehetdve' teszi 
az tnformacid gyors tarola'sat, illetve vissza- 
kereseset. A 82 billontyut tartalmazd billen- 
tyuzet speciahsan a szbvegszerkesztes igenyei 
szerint keszult. A rendszer reszet kepezo 
nyomtato hasznalhato gyors vagy lev^lmind- 
seg uzemmddokban. A PCW mikroszcimitd- 
gep 256 K memoria'val rendelkezik, opcion3- 
hsan csatlakoztathatd hozza 1 Mbyte -os le- 
mezegyseg is. 




Of sz^rmtdgep-szerviz nyfir Budapesten a 
Nefelfijcs utca 1 B-ban. A Commodate gepek 
ea panf^riAik. valarnitit a? IBM kompaiibilis 
q&psk javlraaaa ksrbaril*rt6$6n klviil v3l!ai- 
j5k fcukmbdz6 hardverFejlesztfissk elv^gzdsgt 
g£pa* ilfesztes^t. S hfreinfc wefint mar nyi- 
Caskor flrusftottak azt az ateu&ztikus mode met, 
<ameJy lehotdvd teszi szSmltag^pek qsszq- 
k£t4s£i a megtevd telefonhdlfaaton kar^tU I 
Ez ut6bbi a SIT- LET Sz&tka$M&&q6t is 
keNton fcjlrjgatia &fly akusztikai proba ers- 
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A felvezeto chipek gyart£s3ban alkalmazott, 
a sziliciumszeletek femezesere szolgcild. tin. 
Penning-porlasztSst tokeletesitette tal£lmS- 
nySval Kertesz G6bor elektromerndk es dr. 
V£gd Gyorgy fizikus. Az uj eljcirSssal jelentt5- 
sen megndvekedett a chipek mindsege. 
A Mikroelektronikai VaMlalatnAI kifejlesztett 
mddszer ir^nt nagy az erdeklddes es igen jd 
eredmenyeket ertek el vele az Egyesult Af- 
lamokban is. 



Sved szakemberek olyan kuJonleges kom- 
munik^cids sz^mitdgep rendszert fejJesz- 
tettek ki, amellyel egy nyomdgombos lefefon- 
keszulekkel a vi lag barmely reszerd! kapeso- 
latot lehet teremteni. A rendszer kepes venni 
a beszedhangjeleket es a szamftdgep aital 
adando v^laszt beszedde alakitva tovciDbitja 
a hfvonak. Az uj inform^cios. kommunik^- 
cids rendszer egyedul^lld a vi!3gon. 





nyilt a XV. k«rtj1sjti Csokonai Mtivei5d6si 
H^zban, R^gj ismerc5seink (hiszen veluk ko- 
2dsen rendeztuk tavaly a BIT- LET Kar£- 
csonyt) fejukbe vettek, hogy segitenek a 
geptufajdonosoknak, hogy megtalalj^k egy- 
m^st, hogy esetleg megtal^fjdk 6ket azok, 
akiknek g^ptulajdonosokra vagy progra- 
mozni tuddkra lenne szukseguk, Aki tehat 
folhivja a 690-495-os telefonsz^mot vagy 
szem^lyesen foJkeresi a Csokonai Muvelfid^st 
H^zat a XV., Edtvds u. 64-66-ban, s meg- 
adja ott cim§t tefefonjat, azt hogy milyen 
ge'pe van, az btzton sz^mithat ra, hogy a 
jdv6ben kap majd kulonbdz6 inform^cids 
anyagokat, keresik fit a J( m£rkatarsak'\ a ha- 
sonld erdeklfidesu sz^mitdg^pesek. 
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Mintegy husz Eureka fejlesztesi programba 
kfv^n becsatlakozni a jugosztevtai nagy 
elektronikai c^g az Iszkra. A nyugat-eurdpai 
orsz^gok £ltal a csucstechnoldgicik eler^sere 
letrehozott felkatonai programhoz azzal a 
sz^ndekkal csatlakozott az emfltett jugoszl^v 
vSflalat, hogy ily mddon biztositsa verseny- 
kepesseget a szcimft3stechnik£ban, az opto- 
elektronik^ban, a I6zerkutat3sban es a robo- 
tik^ban. ^ ^J- 



A jdl ismert Commodore 64 mikrosz^mitd- 
g^pet ez ev majusa'tdl kisse ^tafakitott. mo- 
dernebb, laposabb form^ban uj GEOS 
rendszerrel kieg^szitve forgamazzik Angli£- ^ 
ban. A kiegeszit^ssel az Amiga mikrogephez ^ 
hasonldan lehetSseg nyilik menuv^laszt^sra, 
eg^rrel vagy botkorm^nnyal tdrtend mukdd- 
tetesere. ^.^M 





Az angol Amstrad ceg PCW 8256 tfpusjel- 
zessel egy komplett szovegfeldoJgozd. illetve 
nagy teljesftmenyu mikroszamitdgepet hozott 
piacra, amely kic-geszul egy ke'pernyovel, egy 
beepftett diszkegyseggel, billentyuzettel, 
nyomtatdvai 6s szovegfeldoJgozd szoftverrel. 



A japan Hitachi dnasvallalattol mar meg- 
szokott dolog, hogy minden szcimitdgep ki- 
^Jlit^son valami szenzacids OEM-termekkel 
jelenik meg. Legujabb ilyen produkcidja a 
DK-301 tipusu lemezmeghajtdja. Ez egy 
3 1/2 incses Winchester tipusu merevlemezes 
meghajtdegyseg. Az egesz egyseg mindossze 
15 cm mely, 10 cm szeles, 3,5 cm magas, 
de a taroldkapacita'sa 1 5 m-egab^jt. 



Ujabb h^ziiagosan megepitheto hardver- 
kiegeszit^st kin£lnak a ha2ai amatSroknek 
ezuttal a Spectrumosoknak. A budapesti 
Sinclair Klub meg^llapodast kdtdtt a MICRO- 
TEAM GM-mel, hogy a klub tagjai sz£mara 
megkapja a GM aftal kifejlesztett floppy illesz- 
15 6pftesehez szuksgges hardverlefrast r s a 
h^zilagos dpiteshez szuks^ges egye'b szakmai 
segltseget. Ez az iJfesztd barmelyik szabva'- 
nyos floppyval, sdt a Commodore penf6- 
ria'kkal is kepes mukodni, a Spectrum me- 
mdriateruletet nem fggiafja, s r^ada"sul lehe- 
t6v6 teszi a Spectrum CP/M-meJ vald hasz- 
nalat^t. Az interface epitdse ira"nt erdekldddk 
a Sinclair Klubban erdeklddhetnek a to- 
v^bbi reszletek ir£nt: minden lietfdn 1 8-22-ig 
(csak ilyenkor!) a Szelloz6 Muvek - Buda- 
pest XI., fpitesz u. 14. - klubjciban. 
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DSn amatdrbuvarok szamitdg6ppel vez6relt 
robotberendez6ssel szeretn6k megtalalni a 
Kattegat dbdlben, a mSsodik vil6ghabonj v6ge 
fe!6 elsiillyedt U-534 n6met tengerafattjardt. 
Az utdbbi id6ben eldkerult n^ci dokumen- 
tumokbdl kiderult ugyanis, hogy a gydze- 
lemben m6r nem bizd magasrangu n6met 
katonai vezetdk tobbek kdzott ezen a tenger- 
alattjSrdn prdb6ltak nagymennyis6gu aranyat 
6s 6kszert kicsemp6szni. Ebbdl tervezt6k 
fedezni a haboru utani 6letuk anyagi ki- 
adasait 



Nagy teljesitm6nyu, szamitdg6pes forditd- 
g6pet helyeztek uzembe a Szovjetunidban. 
Az AM PAR n6vre keresztelt g6p dr6nk6nt 
7b pldalnyi g6pe't szak^zaveget k£pe5 angol 
ryelvrGI oca&zra fordltam Most dolfloznak a 
szakemberek a berendez6$ nfimet, francia 
£s spanyd valtozatan, A g£p elkAszirfinak a 
fegnagyobb gondot az okozta. hogy a tobb- 
jeEenllsti szavflkszdvegfcornyezetbfl HlojeJen- 
t6s6t drtelrnezzff 6s a vakidl jetenlGsnek meg^ 
felelden forditsa le az uj forditd berendez6s. 




A N6met Demokratikus Kdzt6rsasagban p6rt- 
6$ kormdnyhatSrozatok szulettek az elektro- 
nikai alkatr6sz 6s berendez6sgy6rtSs nagy- 
aranyu fejleszt6s6re. K6t fontos 6s dri6si 
dsszegekbe kerult kozponti programot haj- 
tanak v6gre az NDK-ban: az egyik a lakSs- 
6plt6s, a m£sik a mikroelektronika. A ra^ 
fordita'si dsszegek nem ismeretesek, de csu- 
pSn a chipgy6rtist szolgald szupertiszta 
helyis6gek I6teslt6se is tobb milliard m6rkaba 
kerult. Elhat6roztSk, hogy nem vesznek 
ig6nybe nyugati alkatreszeket. Elektronik6t 
tartalmazd berendezdsekben kiz6rd!ag saj£t, 
illetve szocialista orsz6gokbdl sza>mazd alkat- 
reszeket hasznalnak. Sikeresen gyartja*k a 
8 bites mikroprocesszorokat 6s dolgoznak a 
16 bites elk6szit6s6n. Oriasi erdfeszft6sek 
£r6n ma m6r 8-10%-os kihozatah mutatdval 
6llitjSk eld a 64 6s a 256 K-s RAM-okat. 



Az angliai British Telecom c6g uj, Qwerty- 
phone elnevez6sti k6szul6k6ben egyesltette 
a specialis tulajdonsagokkal, memdriaval ren- 
delkezd telefont az adattermin^llal 6s a be- 
6pitett modemmef. A kuldnleges irodai be- 
rendez6s fdbb jellemzdi a kovetkezdk: 
8 K RAM szdvegtarolasra, 8 K RAM telefon- 
sz6mtark6nt, ami 16 K-ra b<5vfthet<5. 16 K 
ROM kulonf^le programok r6sz6re. A be6pl- 
tett k6pernyd egy 4 soros, 32 betGhelyes 
LCD. A modem 300 Band-os duplex rend- 
szeru. Qwerty biHentyuzet programozd 6s 
termin6lemulacids billentyukkeL tovabba az 
elkuldnltett telefonbillentyOkkel. A Qwerty- 
phone csatlakoztathatd telefonvonalra, soros 
nyomtatdbemenetre, soros PC billentyuzet- 
bemenetre stb. 



utdrendeleseL Itt van az expeaicios rdszieg 
6s a szamitdkdzpont is. A mintegy 1 50 millids 
k6szfetet a sz6mitdgep tartja nytlvan es biz- 
tosftja, hogy folyamatosan ismert legyen: 
a 2250 raklap kozul melyiken tdroijak a ,ke- 
resett konyveket 





Az amenkai PC's Limited c6g bemutatta a 
Turbo PC elnevez6su uj szem6lyi sz6mit6- 
gepet. A gep egy 16 bites 8088-2 tipusu 
mikroprocesszorra 6pul. Kozponti memdriaja 
640 kilobyte-os. Tartalmaz egy 360 kilobyte- 
os Iemezegys6get, egy 5151 tfpusu billentyu- 
zetet 6s egy 1 35 wattos tapegys6get. Az IBM 
PC-re 6s PCXT-re frt programok a Turbo 
PC-n mintegy negyven szazal6kkal gyorsab- 
ban futtathatdk. 

Ara 785 dollar. m m W 



Az 6vekkel eze!6tt hihetetlen gyors sikert 
el6rt Apple c6g, sokf61ek6ppen feldolgozott 
sikersztorija utan, most egy uj elektronikai 
maganvallalkozas kerult a figyelem koz6p- 
pontj6ba. A kaliforniai Szilicium-volgyben 
alig n6gy evvel ezelott alapftotta a Sun 
Microsystems c6get h6rom alig tdbb mint 
harminc6ves fiatalember. Azdta a napsug6r 
fiuknak (sunny boys-nak) bec6zett ha"rom 
sikerember az elsfi 6vi 8 milli6 doll^ros forgal- 
mat 115 millidra, a kezdeti 654 ezer doll^ros 
n y ere s6get pedig 8,5 millidra novelte. A ro- 
hamosan novekvfl c6g fd profilja az ugy- 
nevezett workstation piacra iranyul. Olyan 
nagyieljesitrndnyu professzianShs sxem^lyr 
szfimitdg6pakflt fojles^ienek c-s gyArtanak. 
amelyek kutdnf6te munkahelyeken kompfetr 
tudom3nyos, rnOszaki 6s grafikus feiadatok 
slv^g^6s6rfl alkfllmasak + A feltwekvO uj c6g 
siksrsi Ttibbek kdzott abban is kares^nd&k 
hogy kitund minds6gu term6keit mintegy 
husz szazal6kkal olcsdbban adja, mint a 
rivalis partnerek. 




Ui szamftdg6pes kozponti kdnyvraktar kezdte 
meg mukdd6s6t a Kdnyv6rt6kesftd 6s Konyv- 
t6rell6td VSIIalat V6ci uti telep6n. A nyolcezer 
n6gyzetm6ter alapteruletu raktarban kaptak 
helyet a kdnyvujdonsagok 6s sikerkdnyvek 



A Compodrug Muszaki Fejlesztd Kisszdvet- 
kezet a vilagon elsdk kdzott dotgozott ki a 
molekulak megjelenlt6s6re alkalmas, szer- 
kezetuk tanulmanyozas^t Iehetdv6 tevd, 
IBM szem6lyi szamftdg6pen futtathatd prog- 
ramcsomagot. A dolog je!entds6ge elsdsor- 
ban abban van. hogy korSbban csak nagy- 
teljesftm6ny0 sz5mltdg6ppel lehetett ugyne- 
vezett molekulagrafikai rendszert mukdd- 
tetm. 
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3000 REM "£feft« M 

sees cls 

3010 PRINT *UJ dalt aka.rsz !>• tr 
t? - 1*1 PR INT 

5020 PRINT *A r«i dalt aKarod'* 
PRINT r FfliNT TAB 10J W 1 ejatsia 
111? - 2* 
3023 INPUT u 

3030 IF V'l THEN : RUN 3060 

3033 IF w=5 THEN CLS * CO TO 3 1 

39 

3033 REM "Del beiras** 

5060 INPUT "Hany db hanabol *l 1 

a dal? *?hi PRINT "HansoK szam«e 

3063 INPUT "Esysegnyl hangerteK 
id*4«? *fti PRINT "E0yft«9nyl han 
gerteK idaj*i *#* 

3070 IM*UT "A do haiye? ';mt PR I 
NT "ft do b* I y* s • ;m 
3073 DIM TChJ 
3080 DIM Mlh? 

3083 PRINT « PRINT 'Add sorbn 

3090 FOR j -1 TO h 

3093 WUT T< i ) I PRINT Til? 

3100 NEXT i 

3110 CLS i PRINT "Add t>e *orba * 

51 13 FOR i^i TO h 

3J20 IhPUT M(i)i PR INT M< 1 ) 

3123 MTXT i 

3 136 CLS J PRINT "Nyomj meg «gy 
gon±Jo-t p * PRINT 

3133 PRINT *•* rwgwcUl a Z«f>C 

■ 

3140 PAUSE 0 

3933 REM "?irn« Ujftni*5i" 
6O0B FOR 1=1 TO h 

6005 IF MCt>»30 THEN GO TO 6020 
E010 BEEP "t #TC i l*+M< i ) 
6013 NEXT i 
60PE5 PAUSE T<i>*30*t 
80E3 NEXT 1 
G030 STOP 
6100 SAVE "Z*n* - 
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A ,,ZENE" nevu, 7X Spect- 
rumra frt program afkalmas 
barnmlyen da/. dallam konnyu 
beirasara, ujra lejatszasara, a 
,,do" tetszoleges magassagra 
torteno eltolasara es a ritmus 
tetszoleges valtoztatasara 
Mindjart itt me gem I item, 
hogy a programot sohase in- 
ditsuk RUN utasitassal, mert akkor a gep tdrol minden val 
tozot, hanem kozvetlen GO TO 5000 utasitassal indftsuk ' 
Ekkor a gep megkcrdezi, hogy a korabban befrt dalt akar- 
juk-e meghallg^tm - ekkor a 2 -es szamot kefl betapfalm; 
majd egy tetszoleges gomb megnyomasara megs^olai a 
zene - vagy uj dalt szeretnenk beirni: 1 -et kell beadni. 
Ezek ut3n a gep sorbs teszi fel a ktirdeseket. melyekhe? nt 
sseretn^k nShany magyar^zatot adm: 

a) A hangok darabszamanak beadasanaJ meg kell sza- 
molni, hogy a dal hany db hangbol es hany db szunetbof 
all, es e ketto szam dsszeget kell beadni A peldakent be- 
mutatott dalnal ez a szam: 41 

b) Az egysegnyi hangertek idejenel az utemmutatonak 
megfeleloen kivalasztjuk, hogy egy egyseg az negyed, 
nyolcad stb. lesz, es ennek az egysegnyi hangnak mennyi 
ideig kell szolnia (masodpercben)/A peldankban; egy- 
segnyi hang = negyed = 1 , ennek iddtartama : 0,5 mp. Ennel 
a kerdesnel tehat 0,5-et adunk be. 

c) A do helyenek megallapitasanai szukseg van a ZX 
Spectrum gepkonyvere. Itt talaljuk a hanymagassagoknak 
megfelelo kodszamokat Peldankban: do = de - 2. A be- 
adasra keruld szam: 2, 

A tovabbi beiras konnyftese celjabdl a kotta foie irjuk a 
hangertekeknek megfelelo szamokat (beleertve a szunet 
erteket is), a kotta a/a pedig a szolmizalasnak megfelelo 
hangjegykodokat (ugy, mintha minden dal C-doban 
lenne!). A szunetekhez pedig mindig 50-es kodszamot ir- 
junk. 

A korabbi adatok betaplalasa utan a gep ken, hogy eloszor 
sorban egymas utan adjuk be a hangertekeket Most mar 
csak a kottank foie irt szamokat kell sorba beadni Ezt ko- 
vetoen a gep ken a hangmagassagokat, itt pedig a kottank 
a/a frt szamokat adjuk be. 

Ezzei tulajdonkeppen be is taplaltuk a gepbe a kivant dalt. 
Barmelyik gomb megnyomasaval ellenonzhetjuk, hogy 
mmdent helyesen vegeztunk-e. Ha igen, akkor az elvaras- 
nak megfeleloen szol a dalunk Ha valami problemat eszfe- 
lunk (pi. egy hang magassaga vagy tartama nem meg- 
felelo), akkor se essunk ketsegbe, mert kdnnyen kijavfthat- 
juk a hibat, A javitasnal megszamoljuk, hogy hanyadik 
hangot szeretnenk javitani (i), es egykozvetlen utasitassal 
beadjuk a helyes szamot: 
a hangertek javitasakor LET T(i) = . 
a hangmagassag javitasakor LET M(i) - 
Egy kdzvetlen GO TO 6100 utasftassa 
a befrt dalfal egyutt magnora vehetjuk 
sulyozom, hogy visszajatszaskor sohase RUN-nal, hanerri 
GO TO 5000-rel inditsunk I 

A program tovabbi lehetosege, hogy az cgesz dal megval- 
toztatasa nelkul a do helyet illetve a dal ritmusat tetszolege- 
sen valtoztathatjuk. Fzek a valtoztatasok ugyancsak kdz- 
vetlen utasitassal tdrtennek: 

A do helyenek athelyezesekor a do uj helyenek megfelelo 
kodszamot adjuk be (pi most legyen a do = ge = 7) 
LET m - 7 

A ritmus megvaltoztatasakor pedig a 
LETt = .,. 

utasitashoz irjuk be az uj ritmusnak megfelelo szamot PI. 
ha a dalunkat lassitani akarjuk, akkor 0,6-et, ha gyorsitani, 
akkor 0,4-et irjunk. 

Ezek az egyszeru valtoztatasi mddok nagyon sok lehetose- 
get kinalnak az enek-zenetanftas teruleten is. 
Remelem, hogy a programom bemutatasaval segitseget 
nyujthattam sok zenet es programozast kedvelo tarsamnak. 
ZStonyi JSnos Szombathely. Vaci Mihaly u. 9. 9700 



az egesz programot 
Meg egyszer hang- 




Ugy tunik, nem mertiik fol pontosan, 
hogy mit vallalunk, amikor kiirtuk a 
3 fordulos programozasi palyazatot. 
A C 16 nyerd kozel szaz programjat maig 
sem tudtuk vegignezni. De azt ma mar 
nyugodtan fgerjuk, hogy jovo honapra 

befejezzuk. A noteszokat mar mindet 

lattuk. Vannak koztiik egeszen j6k, de 
az Jgazit" nem talaltuk meg. Sokan 
szem elol tevesztettdk a legfontosabb 
szempontot: a felhasznalhat6sagot. 
Legnagyobb nehezseget a megfelelo 
adattarolds 6s a j6, kenyelmes es gyors 
visszakereses megoldasa okozta. 
Aftaldnos hibak: sokan a feljegyzes sze- 
rinti visszakeresest ugy oldottak meg, 
hogy csak a feljegyzes tetjes szoveg^- 
nek pontos beirasara mukodik. Ez sze- 
rintunk hasznalhatatlan, Jobb, de nem 
tokeletes megoldas a kategoria szerinti 
kereses (minden bejegyzest kategorizalni kell, s egy 
riat rehet egyszerre keresni). ill. a szdveg also" a 
betuje szerinti kereses. A ,,legprofibbak" noteszaban a 
jegyzes baVmely reszlete alapjan lehet keresni. Nagyon 
vesen csindltak heti osszesitot (roviditett formaju feljegy- 
zesekkel), sokaknal meg egy nap programjait se lehet egy- 
szerre a ke>ernyore fratni - ez is sulyosan rontja a hasznaT- 
hatosdgot ! A feljegyzesek kiiratdsandf sok program nem frja 
ki a nap nevet. csak a kulon naptarfunkci6ban azonosfthtb, 
hogy majus X-e milyen napra esik. Ez kenyelmetlen. Leg- 
tobben az egyeb feljegyzest is szigoru formatumhoz kotdttek, 
pi. csak nevet, cimet, telefonszamot lehet feljegyezni. Alta- 
Idnos hiba volt meg, hogy a feljegyzesek befrdsakor a gep 
input rutinjat haszndltak, emiatt a feljegyzesbe nem lehet 
vesszot stb. irni. Sok, egyebkent kitGno programozd figyel- 
mebe ajanljuk, hogy a legtobb gepen (pi. C 64) az input rutin 
hasznalata a felhasznalb szemszogebol sokszor kenyelmetlen, 
,.profibb" sajat input rutint haszndlni (ezt csak egyszer kell 
jdl megrrni es szdmtalan programban lehet haszn&lni !) 
Egy C 64-re irt napt£rprogramot a Commodore ujsag (az 
Orszagos Commodore Egyesiilet lapja) kozol majd. Mi most 
egy Spectrumra frt naptSrprogramot kozlunk, mely messze 
nem tokeletes, de a kozolheto es haszndlhato Spectrum 
programok kdzul a legjobb. Ime tehat Balassa LSszld gyor- 
szemerei p3lyaz6nk programja, a bekulddtt hasznalati ut- 
utmutatoval egyiitt. A program befrdsakor egyetlen kuldnle- 
gessegre kell figyelni. A program a feljegyzeskategoriak je~ 
lolesere nyolc kiilonleges grafikus karaktert hasznal. Eze>t 
erd ernes a program befrdsat a 8110-8175 kozott elhelyezett 
szubrutin befrasdval kezdeni. Ezt a rutint egyszer lefuttatva 
rendelkezesunkre allnak a specials karakterek, amelyeket 
ezutan grafikus uzemmodban A-H betukkel jelenithetunk meg 
6s irhatunk a lista megfelelo helyere. 



UTMUTAT 



a "NOTESZ'* program haszn&iat£hoz 




A ttalattos tojek ox tato : 



A program ZX Spectrum 48 K gepre irodott. A gepef bekapcsolas 
utan NAGYBETUS uzemm6dba tegyuk, 6s a program teljes futasa 
soran ezt a modot hasznaljuk. 
A program csak 48 K-s gepen futtathato le. 

Amennyiben a program futasa leallna, ujrainditcis GO TO 80-nal vagy 
GO TO 800-zal. 



A ttatano s p rogramis merteto : 



A "NOTESZ" program tulajdonk^ppen egy elektronikus hatarido- 
napl6, mefy egy 100 cfmes telefonregisztert is tartalmaz. Mem6ria^ 
takar^kossagi okokbol a programot ugy k^szltettem el, hogy abba (mi, 
illetve visszakeresni a mindenkori napt datumhoz viszonyftva 4 h6tre 
e16re, illetve egy h^tre visszamen6leg lehetseges. A visszakereses 



megkonnyft^seWaekeben befr^skor 8 kiilonfele grafikus szimbdlumot 
lehet hasznalni, melyeketa g6p konnyuszerrel felismer, esfgy a kulon- 
bbz6 csoportosit^sok elv^gezhetfik. 
Err<5l b^vebben a k£s<5bbiekben. 



A program haszn&fatfi lGp&$r&n&pSsr*? I 



A program betdlt^se ut^n a felhasznald rovid szoveges hasznalati ut- 
mutatc5t olvashat a k6perny6n. Innen tovabb l§pve a program a mai 
datum befrasat k6ri. el<5bb a h6napot, majd a napot, arab szammal 
g^pelve. 

Mit tesz a program a dStum ismeret^ben? 

Kisz^mitja, hogy a datum milyen napra esik, ettfll elfire 28 napot. 
visszafele 7 napot feld^tumoz. Megallapftja, hogy a kor£bbi befrast6l 
a mai napig h3ny nap telt el, es ennek megfelel6en l^pteti visszafele" 
jegyzetunket. Ehhez az atrendezeshez a g^pnek par ma'sodpercre van 
szuks^ge, melyhez udvariasan turelmunket k^ri. 
A „feladat" ve*gezt6vel a k6perny5n megjelenik a 



MENU 



0 Atlapozas -to I -ig 

1 egy nap kiirasa 

2 kereses kulonf^le szempontok szerint 

3 telefon-regiszter 

4 beir^s a jegyzetbe 

5 SAVE 

NSzztik a va!a$zt6kot egyenkSnt: 

0 Mapoza's -t6l -ig (0 gomb) 

A "NOTESZ" atlapoz^s^t vegzi a felhasznSIb" altal beirt kezdS dStum- 
tdl a vegd^tumig, naponkent, egy teljes jegyzetlap kifrasaval. Haolyan 
kezd6 vagy v^gd^tumot g^pelunk be, amely meg, vagy mar nem 
szerepe) a "NOTESZ"-ban, a program azt nem fogadja el, 6s helyes- 
bftesre var. 

1 Egy nap k lira's a (1~es gomb) 

A felhasznal6 altal vSlasztott teljes nap jegyzetlapjat frja ki a ge"p a 
k6perny<5re. 

2 KeresSs kiilonfSie szempontok szerint (2-es gomb) 

Egy tajekoztat6 jelenik meg a k6perny6n, mely tartalmazza a grafikus 
szimb6lumok magyarazatat, ill. azok hasznalati. Ennek l^nyege. 




200 CLS 

'ATRENDEZ I " 



LET E=12: LET P=32 

LET E=E-li LET F=A(E>+1 



. "+STR* P+" 



* (O) 



INK 7| BRIBHT 1| FLASH 1 p "A RES 
t PAUSE 2001 GO TO 100 



2 REM "NOTEBZ " 
' Dim A* ( 13,35,27* 

■1 Din B*<7,3> 

6 DIM A< 12) 

8 DIM L* C 1 00 , 15) 
10 DIM D* £35,59] 
1 2 DIM B ( 1 00 > 
14 DIM Etf<12,55 
3ld LET cc-a 
B0 REM FOCI II 

U2 FAFER 6: BORDER 6r CLS : 

94 PRINT WRIGHT 1 ; AT 2 , 0; "Program NOTESZ 

86 PttiNT AT 5,0; PAPER 7; BRIGHT 1;"A PROGRAM EGY ELEKTRDNIKUS HAT AR I DO NAPLO ' 

>Z ALTAI. AD BE I RANDO DATUMTOL SZAMITVA 4 HETRE ELORE IRHATOD BE A NAP I E9EMENYE 
I DEI ANAP 24 LtRAJARA.TELEFONSZAMOKAT REG ISZTERBEN/ 100 51 AM /TAP QL HA— TOD , VALAM 1 1 
^1 tl L NDEN NAPRA 59 KA-RAKTERES WESJEGYZES IS IRHATO. HINDEN ADAT VI SSZAKERHETO 
Itla VISSZAMENOLEG 1 HETRE IS" 

95 PRINT AT 21,7; FLASH \ ; BRIGHT 1:"N0MJ MEG EGV GOMBOT 1 " 
79 PAUSE 0 

100 REM ERTEKADAS 

101 CLS : PRINT AT*lffl\X0| FLASH 1; PAPER 7; BRIBHT 1)"EQY PILLANAT 1 " 

102 go sub 9000 

104 GO SUB 81 IB 

110 CLS : PRINT AT 10,7; PAPER i; BRIGHT 1 | "KEREN A MAI DATUMQT 1 " 
120 INPUT PAPER 2; INK ?; BRIGHT 1; FLASH 1 [ "HONAP/Arab ",A 
125 INPUT PAFER 1; INK 7, BRIGHT 1; FLASH 1|"NAP/Ar*b azamal / " ( B 

PRINT PIT 10,0s PAPER 6; BRIBHT If' A GEP A MAI DATUMNAK MEGFELELQ- EN 

" ■"'NOTESZ□DAT" l ■ 

210 PRINT AT 12,10; FLASH lj PAPER O^INkV; BRIGHT 1;"KIS TUftELMET ' - 

300 REM A* < > FEL TOLTESE 

310 LET O=0 

320 FOR N=l TO A 1 

325 LET 0=0+A(N) 

NEXT N - 
333 LET C=0+B 

3i7 IF C=0 THEN LET D=ii GD TO 350 
340 LET D-C-(INT (C/7)*7) 
34 5 IF U-0 THEN LET D=7 
350 LET E=A: LET 0=D- 1 I LET P=B-l 
360 FDR N=l ID 2B 
370 LET 0=0+1: LET F=P+1 
380 LEI A*(l , 7+N) =STRI E+^.-'+STR* 
390 IF 0=7 THEN LET 0=0 

402 IF P-A(E> AND E=12 THEN LET E-l: LET P-l 
405 IF P-A(E) THEN LET E=E+1: LET P=0 
1 10 NEX T N 

420'LET E=Ai LET 0=D: LET P=B 
430 FOR N=7 TO I STEP -1 
435 IF P=l AND E=l THEN 
433 IF F=l AND E^l THEN 
440 LET 0=0-1: LET P=P-1 
4*12 IF 0=0 THEN LET 0=7 
450 LET fiI(l,M)=STRt E+ 
490 NEXT N 

500 REM LEPE5M □ Z 

501 IF C^LC THEN CLS : PRINT AT 10,0 5 PAPER 2; 
I DATUM FES0BB1 MINT AM I T MAI DATUMNAK BEIRTAL! 

502 LET L=C-CC: LET CC=C 
510 REM A*<) LEPETESE 
520 TF L>34 THEN 60 10 600 
522 IF L< =0 THEN GO TO S00 
525 FDR N=L+1 TO 35 
530 FDR M=2 TD 13 
535 LET A*(M,N-L) »A*(M,N5 
540 NEXT n 

545 LET L>* (N^L>=D* <N> 
550 NEXT N 

555 FOR N=aJ&-L TD 35 
560 FOP M=2 TO 13 
565 LET AS (H ,fJ) =" " 

5 70 NEXT 1*1 
572 LET D*<N)~"" 
575 NEXT M 
580 GO TO 800 
600 FOR N=l TO 35 
605 FOR 11=2 TD 13 
610 LET A*<M,N>="" 

6 15 NEXT M 
620 NEXT N 
630 GO TO H00 
UW0 REM MENU KIIRASA 
^02 F AF Eh 6! BORDER 6) CLS 

U0b PRINT A J _M3; PAPER 7; BRIGHT 1; FLASH 1;"UTMUTAT0" 

B10 PRINT AT 5,3; PAPER 7; BRIGHT 1; FLASH l^'B^AT 7 , 3; " I H 1 AT 9.3, "2" 1 AT ll.3 

1 3 " ; AT 13,3; "A" ; A T 15,3; "5" 
till RES I DRE B]9: LET M=-l 
912 FOR N-0 TO 10 aTEP 2 
B14 LET M=M+1: READ H* 

815 PRINT AT N+5,5; PAPER PI ; INK 9; BRIGHT 1 j H* 

817 NEXT N 

B19 DATA " ATLAPOZAS - tol , -1 g " , "EGY NAP KIIRASA 

.EFtJN REGISZTER" , "BEJRAS A JEGV ZETBE " , " SAVE " 
I B22 PRINT #l;AT 0,3j FLASH 1; BRIGHT 1;"IRD BE A VALASZTOTT SZAMDT 1 " 
I 823 FOR N=l TO 30: PRINT AT l,N S "#"jAT 20,N f "»": NEXT N 

624 FOR N=L TO 20: PRINT AT N,l;"trsAT N,30;"(l": NEJCT N 

B25 PAUSE 01 LET I *— INKEYS 
■ 827 IF CODE I*t:4B OR CODE I*?54 THEN GO TD 825 

Q30 130 TD 1000+VAL 1**500 
1000 REM ATLAFDZAS -TOL.-IG 
1005 LET S=0 

1010 BRIGHT 0: BORDER 5: PAPER 5: CL5 

1015 PRINT AT /,0; PAPER 2- INK 7; BRIGHT 1; FLASH 1 ; * HAN Y AD IK HON AP. HANY AD IK 
NAPJA-TQL KIVANOD LATNI A " "NOTESZODAT 

1020 INPUT PAPER 7; INK 1; BRIGHT 1; FLASH 1 I "HANYAD IK HONAP"(F 
1025 INPUT PAPER 2; INK 7; BRIGHT 1; FLASH 1 ; "HANVADIKATOL? " } FF 

1030 CLS : PRINT AT 7,0; PAPER 7; BRIGHT 1; INK 0} FLASH 1 ; "HANVADI K HONAP.HANYA 

[JIF NAPJAIG ^lUANQD ATLAPOZNI A " " NOTESZODAT 

1035 INPUT PAPER 7; INK 0) BRIGHT 1; FLASH 1 ; " HAN V AD I K HQNAP" f G 

1040 INPUT PAPER 2; F APER 7; BRIGHT 1; FLASH 1 ; " HANVAD IK NAPJ AIG^" : GG 

104b LET FJ^SIK 1 * F+' . '+STR* FF+".' J 

3 04 7 LET G*=STR* S+" . " 4-ST R* GG^'. 11 

J 050 FOR I =1 TO 35 

1055 IF A*(l.h)< TO LEW F*)=Fl 1M£N GO TO 1070 
llfliO NEXT K 

1065 CLy : PRINT AT 10,0: PAPER 0; INK 7; FLASH 1;"AZ ATLAPOZAS KEZDETENEK MEGAD 
OTTDATUM NINES A " " NOTES^ BAN " " 11 : PAUSE 330! GO TO 1000 

1070 f Oft J=l TO 35 

10/5 IF A±(I,J;{ TO LEN S*)-G* TriLN GO TU 1090 
10^0 NEXT J 

1085 CLS : PRINT AT 10,0: PAFER 3; INh; /; BRIGHT 1; FLASH 1;"AZ ATLAPOZAS VEGENE- 
\ : MEGAUQTT DATUM NINCS A 1 "(MOT ESZBAN " " "1 PAUSE 3501 GO TO 1030 

1090 PAF'bhl h- r BORDER 6: CLS 
1095 FOP U=V TD J 
110W F R TNT AT 
"L 1« ' LE I 

1 1U5 FOR M=2 TO 1^ 

111a L_r_ t i = n-i ; ir 

lir'j PRINT AT m+2.: 

i!2k! (MEXT tl 

1 1 ' PRINT Ar 1 / , Li 

11-5 so i;^0 
1 i 0 hi: x 1 N 



" JEG VZETEDET " 



V=""E" 



"KERESES KLF.S2EMP.BZEftINT* t ,*tE 



1 5 ; PAF'LR a : 



•■? f HEN 
INK 9; I 



BRIGHT 1 ( FLOSH l;A*tl,N)( TD 9) 



BRIGHT 1,A*<M,N> 



Br-I6HT 1,DJ\N) 



1140 CLS ; PRINT AT 10,3; P.VFER 2i INK /; BRTCHT 1; h'LASH 1 ; "A 
HOGV VERTED A I LAPU/ rtJF 1 : PAUSE ^00: QD TO B00 
1 ^013 REM 1AHLAZAT RUTIN 

1302 PRINT AT Kfj "Dtitiiirts"; F'AF'LR 0; INK 7: BRIGHT 1;AT 3,0;" Or a: 

130;. fur y=i rn 12 

PRINT PAFER 7; BRIGHT 1;EKVI 
I I 506 NEXT V 

I 1 i07 FRINT AT 17,0; PAPER 0; INK 7; FRIGHT 1 ; "Megj * " 

I 1JL0 Fft INT AT 19 1 2: PAPER 7; 'BRIGHT I ; "A" " ■ i =""B'" ^""C" " <?t" 

Al 20,65 "M=" "F" IJ tS=""G , "■ SJ=""H 

1311 IF S=2 THEN RETURN 

1312 IF □>=! THEN PRINT (tl;AT 0,0; FLASH 1; PAPER 2; BRIGHT 1; INK 7 5 "MASIK ADA 
T=/M/qomb": □□ TO 1317 

1315 PRINT M 1 ; AT 0,2; P L A UH 1; PAPER 2; INK 7; BRIGHT 1; "L APDZ AS=7 L/gomb " 

J 31 7 PRINT #l;AT 0,19; FLASH li PAPER 2; INh 7; BR I I3HT 1 ; ■ VEGE=/ V/gomb " 

1^20 FAUSL 0: LET I*=INKEY* 

1325 IF It-'-L" AND S=0 THEN RETURN 

1327 IF Ii-"M " AND S^=l THEN RETURN 

1330 IF IF-"V" 1 HEN GO TO S00 

l.'ISS GO TO 1320 

1500 REn EGV NAP KIIRASA 

1501 GO SUB 1503 

1503 PATER 5: MURDER 5i CLS 

1504 LET S=l 

1506 FR1NT AT 10,1; F APER 6; INF 0; BRIGHT 1;"MLLYIK NAPOT KJVANOD LATNI?" 
1510 INPUT FLASH 1; PAPER 7; BRIGHT 1 ; "HANVAD IF HONAP" " ? F 
1515 INPUT FLASH lj F'APER 7; BRIGHT 1 ; " HANYAD IKA^ " ; FF 
1520 LET F*=SrR* F+ " . " +5TR* FF+" . " 
1525 FDR N=l TP 35 

1530 IF AI(1,N3( TO LEN F#>=Ff THEN GO TO 1550 
1535 NEXT N 

1540 CLS : PRINT AT 10,1; PAPER 2; INK 7) BRIGHT 1; FLASH 1 1 "A K ERT NAP NINCS A 

" " NOTES/BAN " " ! ,r 

1542 PAUSE 300t RETURN 

1550 PAPER 6: BORDER 6; CLS 

1555 PRINT AT 1,13; PAPER 0; INK 7\ BRIGHT 1;A*(1,N>( TD 95 

1557 LET [=~1 

1560 FOR M=2 TO 13 

1565 LET 1 = 1 + 1 1 IF [ >J THEN LET I=-0 

1370 PRINT PAPER I; INK 9; BRIGHT i t AT M+2 , 5; A* <M , N> 
1575 NEXT M 

1590 PRINT AT 17,5; BRIGHT 1;Q*<N> 

1585 GO SUB 1300 

15B7 IF S=2 THEN RETURN 

1590 GO TO 1500 
I 1599 STOP 
1 2000 REM KERESES 

2002 BORDER 5: PAPER 5i CLS 

2004 BO SUB 8500 

2006 CLS 

2010 PRINT PAPER 6; BRIGHT 1 ; AT 7,0; "IRJ BE EGY SZIMBOLUNOT ES A GEP KIIRJA JEG 
YZETED AZT A SORAT MELYET EZZEL A SZIMB.-AL IRTAL " 
2015 BRIGHT 1: GO SUB 8522: BRIGHT 0 

2020 INPUT PAPER 1; BRIGHT 1; INK 7f FLASH I ; "KEREM A SZIMBOLUMOT ";J* 
2025 IF CODE J*<144 GR CODE J*>151 THEN GO TO 2020 
2030 PAPER 6: CLS 

2035 PRINT #1,AT 1,7; PAPER 2; INK 7; BRIGHT 1: FLASH 1 S "KIS TURELMET KEREK 1 " 
I 2040 FDR N»8 TO 35 
J 2042 LET Y=0 

2045 FOR M=2 TD 13 

2050 FOR K=l TO 5 

2055 POKE 23692,255 

2060 IF A* !M,N> (K)=Jf THEN PRINT TAB B; PAPER 0J INK 7; BRIGHT 1;A*(1,N)( TO 9) 
( r ; PAPER 7; BRIGHT li INK 0 j E* <M- 1 ) ; PAPER 6;AKM,N) 

2061 POKE 23692,255 

2062 If D*[N><U=J# AND Y=0 THEN PRINT TAB 9 ; PAPER 0; INK 7; BRIGHT l;A*(l,N>{ 
TO 9);'; F APER -7; BRIGHT I: IUV 0f"Megi:": PAPER 6;Dt(N>: LET V= L 

2065 NEXT t 
2070 NLXl M 

2075 NEXT N: INPUT "" 

2076 PRINT fll;AT 0,0; RAPE u 1; I Ml /; DRIGHI 1;"A ' "ND TEBZBAN " " NINCS 1 DBB PROGR 
AM" ; AT 1,10; PAPER 7; INK 0; FLASH J;J*; FLASH 0; PAPER L ; INF /;"-AL JFLQLVE" 

2077 PAUSE 200 

2079 INPUT "" 

2080 LET S-3: GO SUB 1312 
2090 CLS 1 GO TO 2010 

2499 STOP 

2500 GO TO 7000 
3000 REM BE IRAS A JEGYZETbE 
3002 LET S=2 
3005 BORDER 5: CLS 
^010 GO SUB 9500 

3015 BORDER 5; PAPER 5i CLS : PRINT AT 10,0; PAPER 2; INK 7) BRIGHT 1; NOTESZO 

" MEL Y I K ■"■LAPJARA"" KI- " ; AT U,3|"VANSZ ADATDT BEIRNl''" 
3020 GO SUB 1510 
3022 IF N>35 THEN GO TO 3015 
30^5 INPUT PAPER 7; BRIBHT 1 1 AT 0,0; FLASH 1 p "MELY 1 K ORA^/CSAH AZ ELSO SZAMOT I 
RD BE! /MEGJEGYZESBE IRNl=30 "(T 
3027 INPUT PAPER 7; BRIBHT 1 ; AT 0,0; FLASH 1;"IRD BE A JEGYZETEDET , A SZIMBOLU-M 
□KKAL VAGY ANELJCUL ! " ; H# 
3030 LET 0=0 

3035 FOR K-0 TO 22 9TEP 2 
3040 LET 0=0+1 

,3045 IF K=T THEN LET A* ( 0+1 , N) =H* : GO TO 3065 
3050 NEXT K 

3055 IF T-30 THEN LET D*<N)-H«: GO TO 3065 
3060 GO TO 3025 
3065 80 SUB 1550 
3070 GO SUB 1312 
3075 GD TO 3015 

3499 STOP 

3500 GO TO SV'JO 

6999 STOP 

7000 REM TELEFON REG. 
7005 PAPER 3 1 BORDER 3: CLS 

7010 PRINT AT 4,I2[ FLASH 1; PAPER 6f BRIGHT 1 ; 11 YALASSZ ! " 

7012 PRINT AT 7,3) PAPER 7| BRIGHT 1; INK 0] FLASH 1;"U";AT 7,5; FLASH 0; PAPER 
6; "UJ TELEFONSZAM BE I RASA"; AT 9,3[ PAPER 7; FLASH 1 ; "K" ; AT 9,5; FLASH 0; PAPER 6 
; "TELEFONSZAM KERESESE " ; AT 11,3; PAPER 7; FLASH 1 ; " T " i AT 11,5; FLASH 0; PAPER fa; 
"TELEFDNRE6ISZTER KIIRASA" 

7015 PRINT AT 18,6; PAPER 0; INK 7; BRIGHT 1 ; " /U/vagy /K/ vagy /T/gcmb " 

7O20 PAUSE 0: LET It^INKEY* 

7025 IF I*="U" THEN GO TO 7300 

7030 IF I*-"K" THEN GO TD 7050 

7035 IF It^T" THEN GO TD 7200 

7040 GO TO 7020 

7050 REM szaih kerciHtt 

705S BORDER 3: PAPER 3: CLS : PRINT AT 10,1; f LASH 1; PAPER 2; INK J\ BRIGHT If" 
IRD BE KINEIW* SZAMAT KERESED7 " 

7060 INPUT PAPER 7; BRIGHT 1; INK 0;"VIG¥AZZ' PONTOS NE^E T IRJ 1 

7061 IF LEN J*>13 THEN LET J**Jt( 10 15> 

7062 PAPER 7: INK 0: BRIGHT 0t BORDER 7: CLS 
7065 FOR N=l TO 100 

7067 IF J*="" THEN GG 10 70B0 

7070 IF C*CN>< TD LEN J*>=J* THEN CLS : PRINT Al 6,5; PAPER 1; INK 7; BRIGHT 1; 
C*(N);AT 8,10; PAPER Z; BRIGHT 1; INK 7; "HIVU3ZAMA: " ; AT 10,12; PAPER 0; INK 7; F 
LASH 1;B(N): GO TO 70B5 
7075 NEXT N 

70Q0 CLS : PRINT AT 10,0; h APER 0; INK 7; BRIGHT i; FLASH 1; ,J ILYEN NEY N I NHS A F, 
EG 1SZ TERBEN ! " : PAUSE 150: GO TD 7055 

7085 FRINT #1;AT 0,7; PAPER 7; INK 0; BR I DIM 1 ; "MAS I k S L AM=/M7qomb " 

7007 PRINT #1; AT 1,7; PAPER 7; INS 0; BRIGHT 1 ; " V 1 ESZA-/V /gcimb " ; AT 2,7; "MENU= /SF 



irJillllilTECHIllMl MElLitiLET IMS SH»TLMIEH 




■-090 t-AUSE 0: L FT I*=INKEY* 
7093 IF I* = n M" THEN GO Ttl 7055 
71013 IF lt="V" THEN BO TO 7005 
7102 IF I*=CHRS 32 T HL\N GO TO I 
7 105 EU TO 7090 
I 7200 REM Kl IRAS 
7202 BORDER 5i PAPER 5s CLS 
720T GO BUD 7325 
7210 GO TO 800 
7299 STOP 
7 300 REM UEIRA^ 
| 7302 CL S : FOR N - 1 TO 1 00 

ir c:t(N) ( ru i»=" 11 then l 

510 NEXT N 

31i LP: 5^=0: PRINT AT 10,0; PAPER 1 ( INI 
nL> HtLV;Al 12,3; PftPt Fl 
AUAT HE( YERE ,UJAT'" 

7:520 PAUSE 250: LT.S : UG <3UU 7325 
"'322 G<! TO 7375 
7 325 FOR N=l TO 100 STEP 20 
?"2b FRINT AT 0.6; PAPER 
7327 FHR N=0 TO 19 



R~N : LET S- 1 i GO TO 

BRIGHT 1;"NINCS A REGISZTERBEN SZAB 
1 LAGH 1;"NEZD AT A REG.-T ES IRJ EGY "?AT 13,4; "REGI 



INK 



FAPFR 7; BRIGHT 



7770 FRINI 
,24;B<N+h) 
73 J 7 NEXT M 
7 339 GO TO 7350 
7740 NEX T N 
7345 GG TO 736B 

7750 PRINT Kl;AT 0,7; RARER 0; INK 

7355 PAUSE 0: LEI I*«INKEY* 
7360 IF T*="T" THEN CLE 1 SO TO 7340 

j5 IF I^"S" THEN RETURN 
7367 GO TO 7353 

736F PRINT #1:AT 0,4i PAPER 7; BRIGHT 1; INK 0; 

PAPER 1; JNK 7; BHIGHT 1 ; " UJRA=/U7gomb " 
736"? PAUSE 0: IF INKEY*="U" THEN INPUT : SO TD 732: 
73 72 00 TG 
7375 INPUT 
";R 



7369 
BRISHT 1; INK 



30 CLS : 
733^ INPUT 
| 7J&7 CLb : 
7390 OLS : 
| DAT BE IRABA" 

395 PRINT AT 10,4; PAPER 7; BRIGHT 
T . REG I SZ TEHHE Z " 

7400 PRINT AT 12,4; PAPER f\ 
ASP A /menu/ ' 

7405 PRINT AT 4,2: PAPER 2; 
RT" 




7; BRIGHT 1 j "Elo* ize 
INK 0;AT M+2,2;M+Mj ". 



a neve"jAT O, 23; "T . Bzafn" 
; TAB 6jL'*(N+M> ; " 



BRIGHT 1 j " TOVABB^/T/gomb Hl ; AT 1 , 7 1 " STOP=/S/ 



LI ST A VE6ERE ERTUNK ' 



F'AF'ER 6;"IRD BE MELYIK SORSZAMRA KERUL AZ UJ SZAM? 

"iCf <R> 



INPUT PAPER 1; BRIGHT 1; INK 7; FLASH 1;"EL0FIZET0 NEVE: 

PAPER 2; BRIGHT 1: INK 7; FLASH 1 ; " TELEFONSZAIT? " r B(R> 
GO SLID 7500 

FRINT AT 8,4; PAPER 7; BRIGHT 1; FLASH 1;"U"; FLASH 0; PAPER 6;"=UJ A 



i; FLASH li^V-'f FLASH fl| PAFER 6;"=VISSZA A 
BRIGHT J; FLASH L;"F"; FLASK 0; PAPER 6; " -FDFELOSZ I 
I MM 7; FLASH 1} BRIGHT 1;"IRD BE A MEGFELELU KARAITE 



LET I#=INKEY* 
l ,L THEN GO ID 7302 
THEN GO TO 70U& 
THEN BRIGHT 0: GO TO 



INK 0;"A TELEFONK ON Y VET BETURENDBE REN— DE 



7410 T 'AUGE 
7420 IF 1*^ J, U 
7425 IF 
7430 IF- l3r='"F 
7435 GO TO 7410 
7500 REM BETURENDBE RENDEZES 
7505 FRINT AT 10,0; PAPER 6s BRIGHT 
11 A GEP , EGY MS TURELMET KER ! " 
7510 FOR N=l TU 100 

7520 IF C*CN)C1)^" 11 THEN GO TO 7540 

7530 NEXT N 

7535 LET N= 1 00 

7540 FOR M=l T □ N-l 

754S LET Z=0 
,7550 FOR K=l TO N-M 

7555 IF C* (K ) ;=CI<K+1 > THEN GO TO 7580 
17560 LET K*=C*(K>i LET K=B(K> 

7565 LET C* tK ) =C* <K> 1 > I LET BIK)=B<F+1) 

7570 LET C*<K+l>=Ki: LET B(ll + lJ=X 
7575 LET Z^i 

7530 NEXT K 

7585 IF Z=0 THEN GO TO 7600 
7590 NEXT M 
7600 CLS ; RETURN 

7999 STOP 

8000 REM Bi t > AO E* t 1 FELTOLTESE 
3005 RESTORE 9050 

8010 FOR N=i TG 7i READ B*(N>: NEXT N 
SO 15 RESTORE B060 

8020 FOR N=l TO 12; READ A (N) : NEIT N 
902=1 RESTORE 3070 

030 FOR N=l IU 12: REAH E_*(N): NEXT N 
(3050 0A1A " S ZE " , " CSU" , "F EN" , "SZO" , "VAS " 
0060 L>ATA ;M,2ti, ,1,318,31, jB,3I,31 
B070 DATA " 00 '02 " , "02-U4 " , "04 -06 " , "Hi -0B" 

11 itr 20 1 , "20-'-"■:" , , 1 22 -24" 
8100 RE! URN 

REM UDD 
til 15 RESTORE Di^l<4 
81 20 FUR N'-i." TO 6 3 

I ^5 RE AO P 
0130 PUKE Ui=K *A"«-N,D 
0135 NFXI N : RE TURN 

B140 DATA 0,252, 52 , 46 , 40 , 44 , ^0 , Ah 
3145 DA I A 0.249,34,36,42,42,46,42 
G150 OA 1 A U, 4ti , 72 , 64 , 55 , 10 . 74 , 55 

OAT A 5J4 , / £ , 7 i- , 65 , ^4 , , « , H 
a 1 60 DATA 144,208,176, I 44, 15 j, 1 3, .1 1 ,9 
8 1 65 DA f A 1 iG, 146,1 62,1 V4 , 162, 146, 138,0 
8 170 DATH 70, 16*?, 1-6,134, 129,169,70,0 
8175 DA I A S?0, 146, 1 ^0,93, 18, 146,98,0 
8500 RErl TAJEK QZT A TO RUTIN 
S505 f-AFER 7: BORDER 6: BRIGHT Is CLS 
B510 FRINT AT 0,4; PAPER 2; I Nt 7; BRIGHT 

8520 PRINT AT 2,3; "Ha ha^znalod napi -Feladataid roQ7 i tesenel es viisiikerileJPSBn 
1 dlabui szimbalumoLat al:For a gep asnlrat felismarve kitudji kereuni «z 1 1 ye 
irrtnyu el tDgl 3l t-sagaidat . Ezen kivul termeasete- sen tiarmit irhatsi a meg + elol 
nip,ineq + elela orajjhoi max. ^7 kar. hnsszban , i 1 1 . a megjwgy; 
. hossr ban . " 

B52I PR I N F HI 12,0: FLASH 1; INVERSE 'li"A SZ IMBOLUMOKAT rtlNDIG A "SOR EL^SO 5 HEL 
YEN El' VALAMt'LY IK ERE TEDD" 
B522 Pf S T (TRE HS ii'i 

READ H* 

":CHR* <65+N);"= " ; PAFER 6;LHRI (I44+N); PAPER 



, "HET" 
,30,31 
B" , "0Q-1 



KED" 



" 12-14" 14-16" ,"16- IE 



"TAJEKOZTATQ A BE IRASH02 " ; AT 1,5s "ES 



ravatba 59 ki 



3 1 .j24 FOE N=--0 TO > 
(J57'i PRINT ' GRAF . 

INK ^;Ht 
R5 ftl NS XT N 

55 b^lrt "I LNiC;' 
| Tl VESSEL' , ' NLVNTiP 1 
854(/l pR'INi #1 ; FLASH 
185+3 PnUSE 0: MRIGFH 



PAFER 



1EI EF ON " , " T ARGYAL AS , MEGBESZELEB" . " SZULETESNAP" , " T ALALFTJZO A KE 
'•y IKULOE. fEf.S" , "CSALAUI PfvUEiRAM ,J , " SZABAD IDG , BZOftAKOZAS" 

PAPtR 0; INF 7; BRIGHT l;Af 0,5;"NYOHJ MEG EGY GDhBOT ! " 
RE I URN 



9<JOV PtM £>WfF_- VERIFY 
9990 ELi ; FRINT AT 10. K 



; PAPER 



INK' 7i BRIGHT Is FLASH 1 1 "BAWE" : SAVE "NOTES 



1 9994 LL^ : F'PINI A I. 10,7; PAPER 6: BRIGHT J; FLASH 1 
?9'i>5 FAUBE 13; CLS : PR IN 1 Al 10.12; HHPER 1; BRIGHT 
.'LHlPi "NDTES2 " 
■->W ' Gu TU 800 
V99 REI"1 BALASEA LASZLO GYURSZE fit RF MEL YE 1 1RGTELEP 



"NVQMJ MEG EGY GOMBOT 1 " 

: INK 7s FLASH 1; "VERIFY": 



1936 ZX SFECTRUM-48K 



hogy kulonfele grafikus szimb6lummaf jelolhetju k meg feljegy?esein- 
ket. Ezek: 

- fontos telefon 

- szuletesnap 

- nevnap 

- randevu 

- fontos targyalas 

- kikuldetes 

- szabadidfi, sport 

- csaladi esemenyek. programok 

MegfelelS grafikus szimb6lum beg^pelese utan a g£p kigyujti azokat 
az elfoglaltsagainkat. melyet ezen jellel kulbnboztettunk meg be- 
ir^sunknil. 

3 Tefefonregiszter (3-as gomb) 

A telefonregiszterunk 100 hfvoszamot es nevet kepes tarolni. 

Tefefonregiszter haszndfata; 

MENU: 

- Uj sz^m beir^sa 

- M^r beirt szam keresese 

- A teljes regtszter kirratasa 

a) UJ sz&m belra'sa: 

A program megSllapftja, van-e meg szabad hely a regiszterben; ha 
nines, kiirja a regtszter tartalmat, es kert, hogy egy regi hivoszam tor- 
lesevel biztosftson a felhasznal6 helyet az uj. beirando adatnak. 

b) Keres4s: 

A program Iehet<5s6get nyujt hogy az elofizetfi neveneK beirasaval a 
geppel kerestessuk ki a regiszterb<3f a megfelel6 bnV6szamot. 

c) Teljes regtszter kifr&sa: 

A teljes telefonkonyvunk kiiratas^ra nyilik mtid a program ezen resz^n. 

4 Belr&s a gegyzetbe (4-es gomb) 

A kepernyan isme't megjelenik a szimbtflumhasznalati t6jekoztat6, 
mefynek elolvasasa ut^n meg kell jetolni, hogy miJyen datumra kiv^- 
nunk befr^st eszkozolni. 

Ezt kovettfen a gep kiirja a kerd^ses napot. melyb6l kitunik, hogy ezen 
ideig miiyen elfoglaltsagot jegyeztunk be erre a napra. A megfelelG 
6ra beirasat vagy a 30-as szam begepeleset (mely a megjegyzSs 
rovatba iratja a szbveget) ezt kbvetfien a szimbdlumot 6s a szbveget 
kell beirnunk. Az ENTER sorzar6 lenyomasa utan ismet megjelenik a 
kerd6ses nap, de most mar a legfrissebb belrasunkat is tartalmazza. 

Figyeiemf 

Az 6rak parosaval vannak feltuntetve, mmdig az elbl aM6 6rat kell 
megjelofni. Egy 6rahoz 27 karakternyi szoveg irhato. A megjegyzesbe 
59 karakter hosszus^gu szoveg irhat6. 

5 SAVE (S-6s gomb) 

Programunk jegyzetunk kiment^set vegzi. A SAVE befejezt^vel a 
magnot lejatszasra allitva egy gomb megnyomasa utan a gep VERIFY 
funkciot vegez. 

Hibatlan masoJas eseten a kepemy6n a MENU jelenik meg. 
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Mostanaban egyre tobb, a 
TV Computerrel kapcsolatos 
kerdest kapunk. N6mi fej- 
tores utan - vajon ki vala- 
szolhatna ezekre? Ogy don- 
tottunk, hogy megkeressuk 
a Iegillet6kesebbeket. fgy 
h&t a g6p fejleszteseben 
reszt vett fiatal mdrnokokkel 
„kdtdttunk egyezseget", mi- 
szerint elldtjak olvasoinkat 
informaciokkal. A mult havi 
szamban kozoltuk Cseh Ti- 
bor ir£sanak also fel6t, ime 
a masodik r6sz. 



ELSd KtiZBOL 



TV COMPUTERR 
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LOGIKAI ESZKOZ, 
FUNKCIOOSZTALY, 
HOZZARENDELESI TABLAZATOK 



Az input 6s output hozza>endel6si tdblazat kezdS 
cime: 

IN TABLE: 2816=0B00h 
OUT TABLE: 2824=0B08h 



Az oper3ci6s rendszer rutinjai egy-egy logikai eszkoz ki- 
szolg£l6s6t, keze!6s6t v6gzik.A logikai eszkozok rendeltete- 
sukt<5l fuggfien kulonbdzo sz3mu szubrutinnal rendelkez- 
nek, melyek kozul a legfontosabb a karakteres 6s blokkos 
input 6s output. 

A logikai eszkdzdk sz£moz6sa 0-t6l 7-ig terjed az 
al£bbiak szerint: 

0 - video: alapvettfen a k6perny<3re rajzo!6s a feladata. 

Emellett tartalmazza a k6perny6tdrl<5, a grafikus fel- 
bontSst 6s palettaszineket be6llitd> 6s a karakterdefini- 
3I6 rutinokat 

1 - billentyGzet : a billentyuzet leofvas^s^t v6gzi. 

2 - editor: biztositja az eg6sz k6pemy<5s programszer- 

keszt6s (full screen editor) Iehet6s6geit,ell6tja a konzol 
input-output funkcidkat. Az input felhaszndlja (meg- 
hlvja) a billentyuzet karakterolvasd rutinjcit. 

3 - hang: a hangkeltG 6ramkort vez6rli. 

4 ~ nyomtatd: a p^rhuzamos nyomtatd kiszolgcilcisSt 

v6gzi. 

5 - kazetta : a magn6kazettSn tdrt6n<5 program- 6s adat- 

t^rolcist, illetve annak visszaolvas^sSt hajtja v6gre. 
Tartalmazza az elJeri<5rz6 (VERIFY) rutint is. 

6 - b6vit5k£rty£k : az oper£ci6s rendszer csak az RS232 

soros vonali k^rtya kezelfiprogramjSt tartalmazza. Ha 
van iJyen k^rtya bedugva a TVC-be, akkor bekapcso- 
Iciskor ez lesz a kijeldlt logikai eszkoz. 

7 - Kernel : a logikai eszkozok 6s a funkcidoszt6lyok egy- 

m6shoz rendel6set v6gzi. 
A logikai eszkozdkhdz csak kdzvetett mddon, hozz6rende- 
lesi t6bl6zatokon keresztul lehet hozz6f6rni. K6t hozzaren- 
del6si tabl6zat van, egy az input, egy pedig az output rend- 
szerhfvasokhoz. Mindk6t t6bl6zat 8 elemu. a rekeszek sza- 
mozasa 0-t6f 7-ig tort6nik. A tablazatok egyes rekeszei az 
input es output funkcidosztalyokat reprezentaljak, a rekesz- 
ben pedig annak a logikai eszkoznek a szama van, amelyik 
az adott funkcioosztaly rutinhfvasait kiszolgalja 
A funkcidosztalyokat is elnevezhetjuk sorszcimuk szerint a 
logikai eszkozok neveivel: 0-video. 1 -billentyuzet stb. 
Alapvetoen igaz az, hogy a funkcidosztalyok megfelelnek 
az egyes logikai eszkozoknek, tehat a 0 funkcidosztafy 
tartozik a video hivasokhoz, az 1. osztaly a billentyuzet- 
hez stb. 

A hozzarendelesi tablazatok vege „nem szabalyos": a 7. 
osztaly mindig a Kernel hivasokat fogja jelenteni, emiatt az 
input es output tablazatban a 7. osztalynak nines rekesze! 
A tablazatok utofso eleme a bovitokartyak osztalyahoz tar- 
tozik es azt mutatja, hogy a negy kozul (0-3) melyik aljzat- 
ban van az aktualisan kijeldlt bovitokartya. Az afjzatok 
kozul a jobboldali, azaz a legbelul levd a 9. szamu. 



Bekapcsol£skor a kovetkezo ertekek kerulnek a 
tdbldzatokba : 

IN TABLE: DEFB OFFh ; video 

DEFB 1 , billentyuzet 

DEFB 2 . editor 

DEFB OFFh . hang 

DEFB OFFh : nyomtat6 

DEFB 5 . kazetta 

DEFB 6 ; b6vft6k£rty6k 

DEFB OFFh ; aktuilis bSvttGkSrtya 
OUT TABLE: DEFB 0 ; video 

DEFB OFFh ; billentyuzet 

DEFB 2 ; editor 

DEFB OFFh ; hang 

DEFB 4 ; nyomtat6 

DEFB 5 : kazetta 

DEFB 6 ; b<5vft6kartySk 

DEFB OFFh : aktu^lis b6vit6k^rtya 
Ha egy rutin hibajelz6ssel t6r vissza, akkor a hfvott funkcib- 
oszt£lyt visszarendeli a saj6t logikai eszkoz6hez az oper^cids 
rendszer. 

A logikai eszkozok legfontosabb feladata a karakteres 6s 
blokkos input illetve output. Amelyik osztaly sajSt eszkoze 
nem tudja ezt v6grehajtani, ott a tablazatban OFFh 6rt6k 
6IL egy6b hfv^sokra (ha van ilyen) a OFFh 6rt6k a saj^t 
eszkozt jeloli ki. Az utolsd elem hely6n a OFFh defrni6latlan 
b<5vitdk6rtya kijelol6st mutat. 

A funkcidosztalyok 6s logikai eszkozok hozz6rendel6se 
megv6ltoztathat6. Egyik Iehet6s6g erre a Kernel rutinok 
hfvSsa, a m6sik pedig a hozzarendel6si t6bl6zatok kozvetlen 
^tfr^sa. A hozz3rendel6si t^blazatoktdl fuggetlenul a Kernel 
osztalyhoz a Kernel rutinok tartoznak, s6t a Kernel rutinokat 
tilos mas osztalyokhoz hozzarendelni ! 

A hozzarendel6sek megval6sitasanak harom tipusa 
van: 

1.1/0 atrendeles : a karakteres es blokkatvitelt rendeli egy 
masik eszkozhoz. A megfelelo eszkoz szamat (0-5) 
kell a kfvant tablaelembe frni. Az osztaly tobbi hivasat a 
sajat eszkozenek rutinjai szolgaljak ki. 

2. I/O atrendeles egy bovitokartyahoz: a karakteres es 
blokk atvitelt egy bovitokartyahoz rendeli. A bovito- 
kartya eszkoz szamat (6) kell a kfvant tablaelembe frni, 
valamint a tablazat utolso elemebe annak az aljzatnak 
a szamat (0-3), amelyikbe a k arty a be van dugva. 
Az osztaly tobbi hfvasat a sajat eszkozenek rutinjai szol- 
galjak ki. 

3. Kozvetlen hozzarendeles egy bovitokartyahoz: a 

funkcioosztaly dsszes hfvasat egy bovitokartyahoz rendeli. 



i 
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10 
12 
14 
16 

ia 

20 
100 
102 
104 
105 
106 
107 

loa 
no 

120 
130 
140 
150 
160 
170 
ISO 
190 
200 
202 
204 
206 
208 
210 
220 
230 
240 
250 
260 
270 
280 



DEF HEX$(X) =CHR$(X+48-7* (X>9) ) 

DEF HEX2$(X)=HEX$(INT(X/16) ) & HEX$(X AND 15) 
DEF HEX4$(X)=HEX2$(INT(X/256) ) & HEX2$<X AND 255) 
DEF DEC(X$)=ORD<X$)-4S + 7* (ORD(X$) > 57) +32* (ORD ( X$ ) 
DEF DEC2(X$)=16*DEC(X$(1 ) > + DEC(X${2)} 
DEF DEC4<X$)=256*DEC2(X$(1 :2) ) + DEC2 ( X$ { 3 r 4 ) ) 
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TV^-COMPUTER 



! 

2,sz. program ! 



Decimal is -hex a ^tsz^mit^s 



GRAPHICS 
PRINT M 
PRINT 
1=0 

FOR J*l TO 4 
: G03UB 200 
NEXT J 
END 



Decimeilis szimok hexa ^rt^ke" 




FOR 1 = 1 TO 1+63 
I$=HEX2$(I) 
PRINT USING * 
PRINT USING ' 
NEXT I 
PRINT 
GET 

RETURN 



^##h ft :I$ 



A kivant tablaelembe a legfelso bit 1 -be allftasaval annak 
az aljzatnak a szamat kell befrni (80h-83h), amelyikbe 
a kartya be van dugva. 
A 3. tipusu hozzarendelesre pelda a floppy csatolokartya 
hasznalata. Ha ez be van dugva a TVC-be, akkor bckap- 
csolaskor az input es output kazettaosztaly kozvetlenuf a 
floppyhoz lesz rendelve. azaz rninden kazettafunkcibt a 
floppykezeltf rutinok hajtanak v6gra. 
A BASIC iefrgsban szereplfi ..peritena" megfelel az itt 
ismeneieu funkciftosztSlynak. A PRINT uiasit^s a 2. szfimu 
kijelolt perlfdridra dolgozik. ez az editor funkciriosztalyt 
jeientL Az LPRINT utasltis kijelolt perif6ri3ja a 4. sz£mtj. 
cz a nyornTatti osztSly. Bizonyos BASIC utasftSsokban 
meg lehet adni, hogy a v&grehajt£s melyik perif&ria ineg- 
htvasSvaf, azaz melyik funkciooszt&llyal rSrT^njsn pi. a 
PfitNTTVC" a kfjpernyore U L mig a PR ! NT#4: i 'TVC" d 
nyomtat6re ries©n|<fen bz LP NT' TVC ' a u/o^i.r/Ha i> 
a , | _pr ;,ij--h 2 "TVC" pedig a keperny6re. Ez a pirdntdtitf*- 
z&s nem va'ltwtatjft meg a hoziAfsnd$16s3 t^bl&eatok ele- 
meiu hanem m£sik funkci6o!Jzl^ly meghivis^val fog rrv3- 
kodnL 

PELDA A HOZZAR.E&l&EL£Sl TAB J A ATlRAsAftA: 
MERGE £ LJ ABAS 

A TVC 1.2 BASIC verzibban nines MERGE utasftas. ennek 
ellenere a MERGE funkcid. azaz programok osszetesuldse 
megoldhat6 a hozzirendelfisi tibia itir^nak segtts£g£- 
vel. 



Azalapgondolat : az editor input osztalyt hozzarendeijuk a 
kazettaboz, es a billentyuzot holyett a listat tartaimazo 
adatfjle-bol beolvassuk a programsorokat. A BASIC inter- 
preter a beolvasott sorokat beilleszn a memdriaban tarolt 
programba 

Nezzuk meg pi. a 2. sz, programot A 10-20 sorokban van 
hai fiiggv6riydsfinfci6 r melyek a decimdlis-h&xa konver- 

zi'ot hSftfik vegre. Csmaljunk ebbu! a MERGE szamara iTfttflt 
egy kazettas adatfajlba. 
OPEN OUTPUT "HEXDEC" 
ok 

A rnagnot a kdvetkezo sor lezarasa elott keH ehnditani: 

LL!ST = 5.10-~20:CLOSE OUTPUT 

ok 

Az LLIST hatosara elobb a fejlec, azutan 256 bajtos blokk- 
ban a lista kerul a szalagra. Az utolso blokkot csak a 
CLOSE hatasara kuldi ki a BASIC ! Ezzet kesz a kazettas 
lista, 

Most johet a MERGE. Toksunk be egy masik programot, 

vagy egyszeruen csak frjuk at a 10-20 sorokat pL urcs 

PRINT-ekre. Megnyitjuk a listafajlt a kazettAn es hozza- 

rendeljuk az editor inputot a kazettahoz: 

OPEN "HEXDEC'YPOKE 2818,5 

Searching 

Reading: HEXDEC 

ok 

ok 

Az OPEN hatasara megjelenik a Searching felirat. AmiKor a 
fejlec blokkot beolvasta, kiirja: Reading: HEXDEC. Az 
OPEN hatasara csak az elso r azaz a fejlec blokk beolvasasa 
tortenik meg. A POKE attrja a hozzarendelesi tablaban az 
editor input osztalyt a kazettahoz A POKE vegrehajtasat 
jelzi az els6 "ok - a k6perny6n es a kurzor nn^g nem 13thatti, 
Ezut^n megto-ttnik az adatblokkok beolvasasa. A beolva- 
sott sorokat ugyanugy ahogy a billontyuzetrfiJ belri soro- 
kat, beiheszti a BASIC a memdriaban levfi programba. 
Ha v£ge van az adatfile-nak p akkor a "fife vege' hibajelz^s 
hat^s^ra az oper^ci6s rendszer visszarendeli az editor 
input osztalyt az editorhoz. kifrja a m^sodik r ok" uzenetet 
6s ijjra l£that6 lesz a kurzor. M^r csak egy dolog van 
halm: 
CLOSE 

Ezzel $ MERGE k£s;.\ arr6l listszassal meggy6z5dhatQnk. 
Fig yelmeztetes : Aki ne:n Lawez^rl^S magn6val dolgo- 
zik, annak a hos^abb peogramok 6ss?^su!6se cfs6 neki- 
fL*tasr3 hibejel^isse? le Jog al!ni. Ennek oka, hogy a be 
olvasori programsorokat a 9AS1C inierpreternek 6rtel- 
meznte 6s tomurfienie kell, ami wetwkent tdbb tdfit vesz 
igenybe, mint amennyr k6t adatblokk kpzott rendelkez£sre 
ill. {lyenkor tandesos a magnti ..pillanat ^UJ" gombiAval 
nih^ny m^sodperces szuneteket beiktaini az adatblokkok 
beolvasisa koz6. 

Csefc Tib or 
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4 PRtMO^nak az else perct&i kezdve szurkoftuok. 
Hiszen ez a magyar mikrog§p akkor szdttt be a 
ringbe, amikor mar ott voftak a nagy hirti es muftti 
etlenfelek: a Commodore, a Spectrum* a HT-ve tett 
TRS* Oruitiink amikor egy igazan §6 Primoval lata! 
koztunk, a szines. nyomogombos Pro-PrimovaL 
Ah hot, n&h&ny bonappat ezel&ti azt hit tub hogy 
most kezdodik a g€p igazi karrierje. Sa/nos teved- 
tiink. 

„A Pnmo-nak befejlegzett „ ;\ „Az igert seines 
gepek gygrtasa e> sem kezdddott rendefm sem le- 
het, **• Fr A Primo ceget f 61 lehet szamolm H6~ 
napok 6ta kulonbozo piety kak terjednek a sokak al- 
tal szidott. sokak aftal kedveit hazai mikrogeprol. 
Gondoltuk olvasomk kedvere teszunk, ha rnegtud- 
juk mi az igazsag, 

Mielfttt elkezdenenk kbntorfalaznL hogy igaz is 
meg nem is, meg fgy van meg ugy van H szogezzuk le: 
a tenyek azt mutatjak, hogy az eddigi legnagyobb 
hazai peJdanyszamu mikroszamitogep gyartasa le- 
aNt. s vajrni keves az es£ly ra, hogy valaha m6g ujra 
indyljon A „csod\ tehat val6ban .,cs6d A/ igaz- 
saghoz az is hozzatartozik persze, hogy a Primo ce- 
get nem kell f6Eszamolni H minthogy ilyen ceg nines 
es nem is volt soha, A Primo gep gyartasara tdbb 
ceg adta ossze anyagi es szellemi erejet A kezdei- 
ben MfCROKEY-nek. niajd COSY^nak atkeresztell 
mernoki iroda r&szvenyesei az EIV10 (Elektromodul) 
az MTA SZTAKI es a Sarisapi uj £jet Mgtsz 
Mdricz Sandor a COSY igazgatoja, Lebek Istvan az 
EMO kereskedelmi vezerigazgato-helyettese es a 
Primo markamenedzsete Pogranyi Karoly nagy bro- 
munkre elsft szora vallalt^k. hogy reszt vesznek egy 
beszelgetesen. ameFynek ezt a cimet ad ha tin k 
volnai- f .Mi4rt futott ide a Primo?". 



Talan Lizleti, taktikat, talan presztizs m&gfontola- 
sokbol, a COSY vezetoi a tavalyi ev veg6n meg leg- 
feljebb csak valtalati korben vallottak be, hogy a 
Primo tovabbi gyartasa azon all v&gy bukik. hogy 
hogyan szerepelnek a masodik i&koiaszamitdgep 
palya^aton Ennek ellenere szakmai berkekben ezt 
mindenki sejiette- s legalabb annyian voltak a palya- 
zat eredmenyhirdet6set eNendr ukkerkent varok. 
mint a „szimpatizansok {Mi az utdbb^ak koze tar 
toztunk) 

Myilvan nemcsak mi, hanem maguka Primot gyart6k. 
menedzse(6k. arusitok is azt gondoftak, hogy a pa- 
jydzat er^dm^nye r a szines nyomogombos geppal 
az alralanos iskolai kategoriaban elert 2 es a ko/ep- 
iskolas kategori^ban etert eistf hely kjhuzza szeke- 
ruket a satbol. Oszinten szolva ma is azt hisszuk, 
hogy joggal gondoftak ezt, hiszen a palyazat ereri- 
m§nyhirdetesen minimum 5000, maximum 10 000 
gepre szolo rendelesrol esett szo. Lebek Istvan szo- 
rnoruan rnondjai - A gepekhe^ sziikseges alkatre- 
szeket nem kis munkdval el ore beszereztuk, s ezek 
ma Is a raktarban vannak. Sokaig mar nem kerulget 
juk. ha 1-2 honapon belul nem erkeznek meg a meg- 
rendelesek. akkor fbJhaSznaljtik mas termekekhez 
Hat tgy Az igert megrendelesek j6szerivel meg 
csak nem is csordogalnak Az edritg befirtottak sza- 
ma meg az ezret sem 6ri el 

Mi tortent? 

Annak idejen, a masodik iskolaszamrtogep- palyazat 
kiirasakor minden erdekelt arra szamitptt. hogy a 
do log ugyanugy mukodik rnajd. mini az eldzo palya- 
zat idejen. Vagyis, hogy a palyazatot gonriozo Tudo- 
manyszervez^si es Informatikai tntezet "ddnlt majd 
eJ, hogy a kdzponti penzeket kinek adja. mibol meny - 
nyit rendeK Igy hat a Primo masodik es efso hefye 
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megnyugtstonsk iatszott, egy nagyobb meg Nifi de- 
14s vat6bafi *.inez4tt. Csakhogy idukozben kiderulf* 
hogy a szamJiasteehrakai kormanyprogr^ir. megva- 
I6si*t^sat is utolerte a decentralizes, meg a &a?da- 
sag* szabatyozas szele. S bogy, hogy nem a p^nzek 
mar nem a kozporsti k£)apban vannak. Egyssek sze- 
rint a penzeket a megyeknek csztotiak szet, Tasok 
szermt ezek a perzek csak etmeletben leleznek. 
A? igazs£g kidsriteset egy kes£bbi lapszamunkhan 
majd megprohaljiifc 

Most I eg yen el£g artnyi. hogy a tenyek a kovetkezok : 
kozponti keret minimaiis, s ezt az tisszeget a Til nern 
megrender^seki-e, han&m a rnegyei vasarlasok tamo- 
gatasara forditja (olcsofeban vasarolhatnak a me- 
gyekgepe*, mert az ar egy resz£tteszi be a kalapba 
a TIH Masreszt teny a* is, hogy a megyek vas&rlasi 
Kedve any hen szolva valtczd, Lathat6!ag nin^s at 
penzuk* amennyire mondjuk a Prima sz^mitoft A 
ksvessbb peY-zhol p^dig inkabb Commodore-i ren- 
delnek, mints em Primot. Igaz Pogranvi Karaly esku- 
szik ra j hogy ha nam d tenna a Primo markamened- 
7^ere h akkor is iohb gepnek tart ana a Primot a 
Commodore-naf, de ezt a v^lemenyet ugy ttinik riem 
sokan osztjak, Az, hogy a Primot kitettek a piaci 
viharoknak, s ezt rem joi aNta, megiscsak azt mu- 
tatja. hogy az ©I mult masfel evbsn a Primot nam si- 
keriilt megszerettetni a vasarJokkal. a kozvelemeny- 
nye!, 

Lehet. hogy epp ez a „cs&d*' oka ? 
Lebek Istvan: - Az elejen sok baj voJt. Nagyon sok 
volt a hibas g§p* ez rcntott a renomenkon. Pedig 
utana egyenletes jo szinvonalat produkaltunk, 
Moricz Sandor: - Azt hittuk, hogy kis szeriaban, 
^rnanufakturalis kbrulmenyek" kbzt is lehet vi- 
tagszinvonaJu technikat gyartam Ma mar tudjuk. 
tevedtunk. 

Pogranyi Karoly: - Az az igazsag 4 hogy a Primo jo 
yep A legtabben a billentyfizetre mondtak, hogy 
hibas F nem mukodik. Pedig csak egyszeruen be kel- 
lett volna a kivant 6rz^keny^grp aMItarti, 
BIT- LET: - V^fem^nyunk szerint a g^pet nem szeret- 
tak meg a szamit6g^pasek. Ha egy iskolaban valo- 
gatni lehet a gepek kozt, nem a Pri moert verekednek 
a diakok. Hogy ennek a biNentyOzet az oka vagy mas,, 
teljesen mji^degy. Egyebkent is hiba volt 1984-ben 
ilven bilientyiizettel rnegjelenni a Spectrumhoz, 
Commodore-hoz, HT*hez szokott hazai pi aeon. K6r ■ 
dazhetik az oJvasok, hogy akkor mi miert irtunk 



a helyzet pill^natok alaft magvaltozott. Besz^l- 
getopartn^ratnk elmondtak, 6ket bizony falke^zii^ 
letleniii *&rte P hegy a kirvti arveraeny oly hamar eltrt 
hozzank is. Nem tudtak rrtft csmal* Az induld arhoz 
tu-sSgosan sokaig ragaazkodtak, hf^zen mar a kez- 
det kezdeten nagyon kis nyeres^ygel kalkul^ltak. 
Ma mar tudjsk. hogy jovdjuk ordekeben megis ha- 
marabb kelfett volna arat csokkantani. A Primo 
sztori egvik'tariiifsagak^nt ismet b&b izo n yo soda 1 1. 
hogy a hazai ipar iehetosegei. az addz4$i, szabSfyo- 
zoi rendszmr n&m t&szih f&hetove. hogy egy hazai 
gyartmarty arban yersenykepes fogy en egy nagy vi- 
iagueg termekSvef. (Kulonbsert ha raadasut „dbm- 
pingaron" adott termekrol van szo J ) Nem csoda te- 
hcit.. ha a Primo ugy megosztotta az ipari. oktatasugyi 
vezetoket, Az egyik Hi valtig hangoztatta a hazai 
ipar t^mogatasanak fontossagat, nvig ^z ellentabor 
a piaci torvenyszerGsecak ervenyesul^set eroftette- 
Elismerve az tnobbl fontossagat, azert ir>eg kali je- 
gyeznurtk, hogy valoban furcsa helyzet amikcr egy 
orszagban a kylfoJdr ipari terrnekek irnportja na- 
gyobb kedvezmenyeket elvez, mint a hazai gyarto. 
Mar pedig a Commodore-Pro- Primo Pj versenyben" 
ilyen helyzet allt eEo. 

Mi a mag unk reszerol ezuton veszimk bucsut egy 
jobb sorsra ^rdemes magyar mikrogeptdL Sajnal- 
juk. hogy ilyen rovid £letiJ volt. Csod6kban mar nem 
remenykedunk, ha a szines gapre eddig 300 megren- 
delest kapott a ceg, szerintunk mar nem sokkal kap 
tobbet a kovetkezo 1 2 honapban, A magunk resze- 
rol ugy gondoljuk, hogy rengeteg tanulsagot rejt 
magaban a Primo sztori, hogy pentosan milyeneket 
- err61 a hazai ipar vezetoinek is erdemes lenne kon- 
zultalni az illet&kesekkeL (Azaz beszelget6partne- 
reinkkel) £s v^gul a mag unk reszerol persze nem 
tekintjiik befejezettnek a Primeval val6 foglalko- 
zast # mert egy mikrogep amelybdl tbbb ezer van az 
orszagban nekunk meg sokaig tema marad. Tehat 
Primo tulajdonosok figyeieml A BIT-LET-ben to- 
vabbra is szamithatnak programokra h informaciok- 
ral 



rik. nem tvszik el r6la p hogy valbban sokkal jobb a 
regtnel A mi sziuunk fiszmten sz6tva v/erzik ezer t 
a }obb sorsra erdemes konstrukcioert. Hogy ugyan- 
olyan 36k lettek volna-e a sorozatgyartasban ke- 
sziiJo gepek mint az elkeszult nehany mintapeldany 
- iiav lunik mar so ha sem foa kideruJm 



oeznetiit az oivasoK, nogy anKor mi mien miumh 
olyan jokat nehany h6nappa) ezelotti kQJonleges 
Vallatonkban a nyorndgombos, szines Pro Primo* 
rol 7 Azert. mert ez a Primo va!6ban jol vizsgazott 
S az az erzesunk, hogy a megrendeiesek tobbek 




A Primo azert nem szunik meg leteznj. Anna) is 
kevesbe. men piltanalnyilag kb haromezer gap van 
meg az EMO raktaraiban. Ezek egy resze mar nyo- 
m6gombos. ha nem is szines. Ezeket mindenkeppen 
el szeretnek adni. Szeptember elsejetol kozel 
30%-kal olesobban lehet megkapnt ezeket a gepek et. 
Az arak a kbveikezok: A32 - 5S60 Ft; MB - 7670 Ft; 
A64 8670 Ft: B32 - 7180 Ft: B64 - 12 590 Ft. (A B 
jelit gepek nyombgombosak,) RaadasuJ az iskotak 
a szukos kozponti penzatap tamogatasavat {Kettot 
fizet - harmat kap m6don) vasarothatnak. 
Apropos, ar. A Primo - ezt mindenki tudja - nagyon 



sikeresen indult meg a meglehetosen sok muszak 
hi ba ellenere is. Hiszen annak idejen 1964 oszen a 
legolcsdbb itthon kaphatd mikrogep volt. Azutan 
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10 REM ##*######***##**##**#*#******** 
20 REM * O R 0 S Z B E f U K * 
30 REM *#*************************■**** 
40 POKE 16561,71,103: CLEAR SO: DEFINT 
1-Pa DEFSTR U-Zs P- 16452; DIM K<58>: 
POKE P,128: POKE P+7,72,103 
50 FOR I--0 TO 58: READ Kit K(I)=K: 
BEEP K,50: NEXT: PRINT CHR*<2) 
60 POKE 26440,0,112,16,16,24,20,20,25,0, 
68,68,68, 100,84,64, 101 ,0,60,68,68,60, 
20 , 36 , 69 , 0 , 68 , 68 , 68 , 60 , 4 , 4 , 5 , O , 84 , 84 , 
56, 16,56,84,85,0, 112,8,4,60,4,8, 113, 
40, 124,64,64, 112,64,64, 125,0, 124,64, 
64, 120,68, 68 , 121 
70 POKE 26504,0,72,72,72,72,72,72,124,5, 
0,0,0,0,0,0,0 ,0 ,28,20,20,36,36, 124, 
67,0,0,0,0*0,0,0,0, 16,56,84,84,84, 
84,56, 17,0, 120,68,64,64,64,64,65,0, 
68,68,76,84, 100,68,69, 16,84,68,76 , 
84, 100, 6B, 69 
80 POKE 26568,0,28,20,36,36,36,36,69,0, 
124, 68 ,68, 68, 68, 68, 69, O, 72 ,84, 84 t 116, 
84,84*73,0,84,84,84,84,84,84, 125,0, 
84,84, B4, 84, 84 ,84, 126,3,0,0,0,0,0,0, 
0,0,64,64,64, 112, 72 ,72, 113 
100 REM MINTAALKALMAZAS 
110 FOR J=0 TO 11: READ Us CLS: 
GO BUB 1O10 
O FOR 1=0 TO 3000: NEXT: NEXT 
130 END 

1000 REM BETUK 1 1 RAT AS 

1010 K=L£N<U)i PRINT* 6,21H<,W; 

1020 FOR L=l TO K: V=Ml (U , L , 1 > : M=ASC 

(V>-32i N=K (M) : PRINT CHR* (N> ? : 

BEEP N,30s NEXT: PRINT 
1030 RETURN 

9000 REM ADATOK (READ) 

9010 DATA .32,33,34, 128, 129, 130, 131 ,39, 
40, 41 , 132,43,44,45,46,4 7,48,49,50, 
51 ,52,53,54,55,56,5 7,58,59,60,61 T 
133,63, 134,65,135, 136, 138,69, 140, 
141,88, 142, 143,75, 144,77,72,79, 145, 
146,80,147,84,89,66, 148,67, 150, 151 
9020 DATA ODIN, DVA , TR I , &ET$RE , P7.TY , 
5 SEXTY, XEMY , VOXEMY . DEVXTY , DECXTY , 

7 ODINNADCATY , DVENADCATY 

90 FOR J=26440 TO 26623s 5=S+PEEK (J >: NEXT 

91 IF S=9670 THEN PRINT "HELYES 1" 

92 FOR J=0 TO 5B: T=T+K < J) i NEXT 

I 93 IF T=5104 THEN PRINT "HELYES 2" 
5 94 STOP 
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A PRIMO iskoiai alkalmazasat sokoldalubba 
tehetjuk, ha orosz szoveget is irhatunk vele. 
Ebben nem a karakterkes2it.es jelenti a leg- 
nagyobb gondot (BIT-LET 15. 30), hanem az 
orosz S2oveg kenyelmes bevitele. Itt kozolt 
programom a szbvegbevitelnek egyszeru (le- 
nyegeben fonetikus) modjat alkalmazza. Egy 
egyszeru fogassal sikerult azt is megoldani, 
hogy a gep vegyesen hasznalja az ujonnan ge- 
neralt jeleket a latin abec6 felhasznalhato 
betuivel. 

A S2bveg bevitele (INPUT vagy DATA) kozben 
ki kellett zarni a kettos betuket, ugyanakkor 
bevonni a munkaba nehany kiilbnleges jelet 
{3. lista). 

A rnellekelt program 40-es sora a szukseges 
taroloatrendezeseket vegzi (vedett teriilet az 
uj karaktereknek, tipusdef intciok, tbrnbdi- 
menzionalasok, atallas nagybeture). Az 50-es 
sorban tortenik egy nagyon fontos muvelet: 
egy tombben atrendezzuk a karakterek eredeti 
kodjait, hogy a kivant helyeken a gep az ujon- 
nan tervezett jeleket tudja irni. A 60-70-80-as 
sorokban toltjiik helyukre az uj karakterek 
adatait. A 100-as sortol tervezhetjuk a tenyle- 
ges munkat - most itt csak egy egyszeru de- 
monstracios programresz talalhato, amely a 
kepernyore irja az orosz szamneveket 1 -12-ig. 

Az 1000-es sortol talalhato az orosz szo foie 
tikus alakjat elemzd es a ciril betuket kiirato 
szubrutin. A 9010-es sorban helyezkednek el 
az atrendezett kodok (fontos, hogy beolvasa- 
suk meg az elokeszitd fazisban megtbrtenjek). 
A 9020-as sorto! irhatjuk be az orosz szavakat. 
Ha a program szervezese olyan. hogy ismetel- 
ten szukseg lesz a beolvasasukra, ne fefejtsuk 
el alkalmas helyre beiktatni a RESTORE 9020 
utasitast ! 

A program (1. lista) segitsegevel tetszdleges 
szoanyagu oktato, gyakorlo vagy ellenorzo 
feladatokat alfithatunk ossze. 

A program beirasa utan erdemes ellenorizni az 
adathalmaz helyesseget. Iktassuk be a prog- 
ramba ideiglenesen a 2. lista sorait! Ha a pro- 
bafuttatas utan megkapjuk mindket ,,heJyes" 
kiirast. tbrolhetjuk ezt az bt sort (DELETE 
90-94). 

A program egyszeri futtatasa utan az uj betuk 
a billentyuzetrol is elerhetoek : CTRL + I + betu 
(A - V) billentyuzese orosz betut ir a kep- 
ernyore. Programbol a CH R Sf 1 28) - CH R S 
(151) utasitasokkal lehet megjeleniteni az uj 
karaktereket 

Fekete Gyorgy 7300 Koml6 r Bocskai u, 35- 
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Commodore 16 

Qlvastam Morvar Las/16 cikk£t a BIT-LET juliusi szamaban, 
amelyben a C1 6 kisfelbontfisCr grafrkdjdval foglalkozik. Re- 
mek cakk ' A ket karakterkteszlet egyideju megjejenftdse p6l- 
d£ul ..^Jetbevag6an' fontas volt a most keszulfl prograrnom- 
hoz. ak^j a labbszfnu karakterek !ebet<3s£ge (barezl sejtet- 
tem). En is felfedeztem n^hany apr6scigot a C16-an k azt 
hiszem fontos segftseg a szakirodafomban szeg^nyes vrl£- 
gynkban a programoztiknak 



1. Bovit&tt hMterszin mod 



- Ez a lehetoseg a C64-en is megtal^lhato. Ebben az uzem- 
m6dban a karakterek haiterszine nem egyseges, a CO- 
L0R1,.,. utasitassal beallitott szm. A keperny6mem6ria ha- 
tarozza meg a karakterek hStterszmet a kovetkezo elven: 
A 7-6. bit az aktualis pozlci6 h^tterszine, 5-0. bit az adott 
pozici6n ta>o!t karakter k6dja. Latjuk, hogy a karakterk6d 
tarolasara csak 6 bit all rendelkezesre, ez6rt csak az elso 
64karaktt-n Fa^znSlhafjuk ebben az uzernmddban Tehat a 
SHIFTS. RVS ON 6s ezek kombinacitija a megfeialfl 
hittfrszfrnj karaktereket adnak. Eltumk teh^t a grafikus. 
k% az mverz k^szlet (a kurzor is !). A 7-6. bit Morvai L£szl6 
Altai ismerteteit mtidon hatarozza meg a szfnt (00 -hatt6r- 
szin 01 = mult i. 10^multr 2,11 = multi 3). Az egyes 
szJneknek megfefelfl cfmek FF1 5h. FF1 6b F FF17h, FF18h. 
Ezt az uzemm^dot a FF06 6. bajenek magasra fillftasavai 
kapc$olhat6 be: PGKE65286, PEEK(65286)OR64 ki- 
kapcsola^a POKE65286. PEEK(65286) AND191. 



2. Funk ciob ille n t ytik 



- A funkcib billentyukhoz tartoz6 szbvegeket a C16 a 
055Fh-05E6h tarolja a kovetkezo elven: 
055Fh cimen tarolja az F1 billentyukhoz rendelt szoveg 
hosszat, a 0560h cimen az F2-h6z rendelt szoveg hosszat 

tarolja 0566h cimen az F8 billentyuhoz rendelt szoveg 

hosszSt tarolja. A valddi tarol6 0567h-<§n kezdfidik. In a 
hozzarendel^seket karakterenkent a funkcib billentyuk 
sorrendjeben tarolja (1 ,2.3. . .,8), Ha a nyolc mutatdt. es a 
tarat kimSsoljuk, akkor ezzel az egyszer befrt rendelSseket 
mentettuk ki. AjSnlom a kovetkezS hozzarendel&t a prog- 
ramfejleszttfknek; 

KEY1."RUN"+CHR$(13) 
KEY2,"LIST" + CHR$(13) 
KEY3."AUTO10"+CHR$(13) 
KEY4."5 db cursor jobbra" 
KEY5."LIST100O-" + CHRS(13) 

KEY6,"KEY5," + CHR$(34) + "LIST 4 db space - 1 db 
space" + CHR$(34) + "CTRL+2 :POKE 1413,13 CTRL+1 
19 db cursor balra" 
KEY7,"KEY7," 
KEY8,"HELP" + CHR$(13) 

Ha lenyomjuk az F6~ot, akkor megjelenik a kovetkeztf fel- 
frat: LIST — A kurzor kozvetlenul a LIST utdn all. Ekkor 
definiaihatjuk. hogy melyik sort6l list^zzon az F5. Vizsgal- 
jak meg b^tran, hogy mire szolgSI a POKE utasltis a de- 
finfci6ban ! 

Fazekas Attifa Kemecse, Kecsk§shegy 15. Pf. 56. 4501 



A 64' er-boi! 



Vlcg az igazan jtinak tartott C-1 6 BASIC is ktegd&zimetf 
hasznos POKE utasftasakkaf. Ehhez nyujt atleleket a 64'et 
juliusr s?Ama 

Az aiabbiakban leirom a hivatkozott cikk ,,nem szo szennti" 
fordftasat Az anyag kozreadasa bizonyara oromet okoz a 
C -16-osok tulajdonosainak 

POKE 205,0-24 A kurzort iefele mozgatja a megadott ertek 
szerint 

POKE 775,1 28 Lisiavedefem Csak a sorszam kerul 

adasra. (Normal erteke 139) 
POKE 775,252 LIST utasftas hatasara resetelodik a rend- 

szer. (Normal erteke 1 39) 
POKE 19,0 Engedelyezi az INPUT-kerdojel kilrasat 
POKE 19,1 Tittja az INPUT-kSrdojel kifrasat 
POKE 194.1 RVS ON 
POKE 194,0 RVS OFF 

POKE 239,0 Torli a billentyuzet puffert. J6I hasznalhato 

pt. a GET es GETKEY utasitasoknaL 
POKE 1525.0:1526.0:1527,0 SAVE vedelmet eredmenyez. 

(A C-1 6 szimul^lja a SAVE es a VERIFY utasftaso- 

kat es minden ugy n6z ki, mintha mmden rendben 

lenne. Norma16rt6ke: 255) 
POKE 65286, PEEK(65286)AND239 Kikapcsolja a kep- 

ernyot. A programok ilyenkor kb. 6%-kal gyorsabban 

futnak. Praktikusa rendezo programoknal vagy adat- 

halmazb6l val6 keres6sn6l. 
POKE 65286,PEEK(65286)OR16 Visszakapcsolja a k6p- 

ernv6t. 

PRINT PEEK(56) * 256 + PEEK(55) -(PEEK(44) * 256 + 
PEEK(43)) 

Megadja a m^g rendelkezesunkre AW6 szabad me- 

mdriateruletet. (Nem a PRINT FRE(0) lekerdez£st 

szimulalja.) 
PRINT PEEK(56) * 256 + PEEK(55) 

Megadja a BASIC taro!6 vetcfmet+1 -et 
PRINT PEEK(44) ^ 256 + PEEK(43) 

Megadja a BASIC t^rolo kezd6cfm6t. 
SYS 65526 vagy 
SYS 65529 Resetet okoz. 
SYS 32768 vagy 

SYS 1 28 * 256 Minden esetben resetet okoz. A BASIC 
programot ki torli, a szfnek megvaltoznak, a funkciti- 
bilfentyuk megtartjcik eredeti tartalmukat. 

SYS 65499 A Tl$-et lenullazza 

£s meg egy tipp. Igy lehet egy programot automatikusan 
betolteni 6s efinditani: 

A$ = "LOAD" + CHR$(13) + "RUN" + CHR$(13) 

FOR A=1 TO LEN(A$):POKE 1318+A,ASC(MID$(A$, 

A,1): NEXT: POKE 239,A: END 

Honti Tamas 8000 SzSkesfehervar, Kand6 Kalm^n Sza- 
mft^stechnikai Foiskola Kollegiuma Schonherz 2. u. 8. 




Barmeiy program bonyoluttsaga 



addig fokozodik , 
amig tut nem no 
programoz&fa kepessegein / 
{Murphy torv&nykonyve) 
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Farkas Zoltan-Balint Andras; Commodore 
64 filekezeles es input-output - LSI 

ATSZ, 141 o., 119 Ft. 

Azoknak nyujt segitseget a kbtet. akik - b^r 
a C 64 nem igazan alkalmas adatfeldofgo- 
z£sra - jobb eszkbz hijan m6gis ilyen fel- 
adatok ellatasa>a kiv£njak hasznalni g6puket. 
Az elso resz a BASIC 6s a KERNAL I/O 
utasitisait. g6pi kbdu rutinja it tartalmazza 
referenciaszinten, ismertetve a BASIC-bbvi- 
tesek lehetosegeit is A m£sodik resz a file- 
szervezessel fogfalkozik : egy adatnyilvan- 
tarto program reszletes elemz6sevel mutatja 
be azokat a programoz£si mbdszereket. el- 
j6r£sokat. melyek m6g nem haladjSk meg a 
g6p kapacitSs^t. 

Dr. J6noki Lajos-Dr. Kocsis J6nos: Szamito- 
g6pes termelesiranyit^s - Muszaki Kbnyv- 
kiadb, 330 o,. 90 Ft. 

A szerztfk az iparvalfalatok termeles- 6s gaz- 
dasagir3nyft6si r6szfeladatait, illetve azok 
kapcsolat6t elemzik, jbl hasznosfthatb isme- 
reteket nyOjtva e feladatok szSmftbg6ppel 
segttett ellatasShoz az ir6nylt6sban 6rintett 
vezetbknek, m6rnbkbknek, kbzgazd^szoknak, 
matematikusoknak. 

SzlSvi P6ter-Zsakb Lasztb: Mbdszeres prog - 
ramozds - Muszaki Kbnyvkiadb, 116 o., 
50 Ft. 

A kbnyv hatekonyan mukbdfi, gyors, 5t- 
tekinthetb 6s kbnnyen mbdosfthatd BASIC- 
programok elk6szit6s6ben segi'ti az olvas6t. 
Weltner: Tovdbbi ttppek es trukkdk a 
Commodore 64-eshez - DATA BECKER 

- Novotrade, 187 o., 239 Ft. 

A ..Tippek 6s trukkbk..." c. kbtet folytat6sa 

- ef6d]6hez hasonlban - hdzi haszn6latra 
sz6nt btletes programozdsi fogasokat mutat 
be. E konyv elsbsorban a szoftverv6delemmel, 
a grafikaval es a megszakitSsokkal foglalko- 
zik. valamint attekinti az oper^cibs rendszer 
rutinjait es a KERNAL cimt6bl6zatot. Hatodik 
fejezete a Liftes fiu cfmu jat6k elk6szft6s6nek 
folyamat6t frja le, a program teljes Iist6j6val 
egyutt. 

Sz6kely Ldszlb szerk.: Sinclair Spectrum 
jatik es program - LSI ATSZ, 248 o., 
1 94 Ft. 

A ZX Specktrum otthoni felhaszn6lbinak - 
j3t6k. 6s egyszeru programoz^si, adatnyilv^n- 
tartfci c6lra - szolg$l szamos hasznos infor- 
macibval a kbtet. 

Szlavi Peter-Zsakb L6szlb: M6dszeres 
programozas - Muszaki Kbnyvkiadb, 1 1 6 o., 
50 Ft. 

NyilvSn mindenki ja"rt m6r ugy egy feladatta! 
ta!6lkozva, hogy azt hitte, tbkeletesen 6rti azt 
Ekkor leult a g6p el6, hogy azzal keresse a 
megoldast - 6s egyre ink^bb belebonyolbdott 
a program re"szleteibe. Amikor pedig verejt6- 
kes munkaval vegul is elk6szult a .,nagy mu", 
kiderult. hogy nem az eredeti feladatot oldja 
meg, vagy nem ugy, ahogy kellene, vagy 



olyan lassan. hogy nem erdemes kivarm, 
vagy . . De tegyuk fel, hogy esetleg megis 
jbl mOkodbtt. Am amikor egy net mulva 
hasonlb probl6ma megold£s6ra is elbvesz- 
szuk, kiderul, hogy lehetetlen hozz^igazitani 
az Ltj fefadathoz, mert szerkezete - ha van 
egyaltaf6n - annyira attekinthetetlen, hogy 
egyszerubb az eg6szet elblrbl kezdeni. 
Mi lehel ennek az oka? Kezbe v6ve a legtobb 
programozassal foglalkozb konyvet, altala- 
ban az adott nyelv utasitasainak felsorolSsat 
tal^ljuk benne, jobb esetben fontossag, 
illetve tanulhatbs6g szerinti sorrendben, 
rosszabb esetben lexikonszeruen, ABC- 
rendben, M6g a legdidaktikusabb kezikony- 
vek is, miutSn a programnyelv n6h^ny koz- 
vetlen uzemmbdu parancs^t rsmertetik, rog- 
ton rat6rnek a szintaktika fokozatos bemuta- 
tas^ra. A kezdb felhaszn^lb pedig. amikor 
botdogan t^tja, hogy a g6p engedelmeskedik 
neki. kbnnyen azt hiheti, hogy a nyelv isme- 
ret6ben barmit meg tud oldani, 6s olyan rossz 
programozasi szok^sokat vesz fel, amelyek az 
elbbbi, kusza programokhoz vezetnek. 
A BASIC a Iegkev6sb6 sem strukturalt prog- 
ramnyelv. Paradox helyzet: a kezdb" progra- 
mozb BASIC~et tanul a kbnyvekbbl, azut^n 
m^s nyeJvekkel megismerkedve alig tud sza- 
badulni a hibas beidegz6d6sektbl. Azok a 
kbnyvek pedig, amelyek kicsit is magasabb 
szintti. jobban szervezett - vagy haszn^ljuk 
a kifejez6st: mbdszeres - programoz6st tanf- 
tanak, ma> felt6teleznek bizonyos sz^mltas- 
technikai ismeretet, nyelvezetuk is a szak- 
zsargon. 

Azt hogy BASIC-ben is lehet jbl szervezett, 
attekinthetb 6s gyors programot irni. Szlavi 
P6ter 6s Zsakb Ldszlb most megjelent kbtete 
alapjin lathatja be az olvasb. A kbtet ci'me 
tul komoly. Tartalma viszont nemcsak a be- 
avatottakat 6rinti, hrszen fbleg azoknak frb- 
dott, akik otthon hasznaljSk mikrosz^mftb- 
g6puket. A szerzfik c6lja: egyetlen alapfeladat 
megoldds6ra frt programot fokozatosan fej- 
lesztve megmutatni, hogy mi6rt jobb a mbd- 
szeresen megfrt program, mint az, amely ad 
hoc (a ..frontalis tamad6s mbdszer6vel") 
keszul. Idbnk6nt el-elkanyarodnak a kituzbtt 
feladattbl, hogy az olvasbt az ahhoz nem 
szorosan kapcsolbdb algoritmusokkal, fogd- 
sokkal is megtsmertess6k: de ezt a kacskarin- 
gbsnak tunC utat p6ld5s logikai fel6pft6ssel 
kbvetik v6gig. 

Ami az els6 belelapoz^skor a legszembebt- 
Ibbb: a kbdol^ssal - vagyis a programnak az 
adott nyeJven valb lefras^val, a g6ppel valb 
meg6rtet6s6vel - csak a prog ram k6szft6s leg- 
v6gsb f^zisak6nt foglalkoznak a szerzbk. * 
Egyetlen programnyelv haszn^lata helyett 
egv kiterjesztett 5Ital6nosftott nyefvet vezet- 
nek be, igy biztosftva a legnagyobb fugget- 
Iens6get az adott g6ptlpustbl. 
A kbtet nines fejezetekre tagolva. sorszSm 



n6lkuli alcimek jelzi k csak a kbvetkezo n6h^ny 
oldai t6m^j6t M6gis elkulonfthet6ek a 16 
r6szek A szerzok elbszbr bemutatj^k a mbd- 
szerek nelkuli programiras legfontosabb hi- 
ba it, majd azokat az elveket ismertetik, ame- 
lyeken a mbdszeres programk6szft6s afapuL 
Ezt koveti a legfontosabb algoritmusok le- 
ir^sa, melyek m6g a legegyszerubb progra- 
mozasi feladatnSI is szuks6gesek lehetnek. 
A programhelyesseg 6s -hat6konys^g, a 
hwbakereses 6s a programteszteles a kbvet- 
kezb t6makbrbk; majd a programdokumenta- 
cibrbi szblb rovid ismertetes zarja a kbtetet. 
A tenedelmes fuggel6k tartalmazza a szerzbk 
aJtal bevezetett altal^nos programnyelv le- 
ir^s^t, e nyelv kbdolasi szabalyait bt efterjedt 
gep - ABC 80, HT 1 080Z, ZX 81, ZX Spect- 
rum 6s C 64 - BASIC-nyelv6re, vafamint a 
kbtet elej6n kituzbtt feladat megoldSsara 
szolgalb program list^it e g6pekre. 
A szerz<5k stilusa tbbbnyire oivasm^nyos, nem 
tudom6nyoskodb - kiv6ve, sajnos, a Tegfon- 
tosabbat: az alcimeket 6s az uj fogalmak 
megnevez6seit. Ez lehet a Jegfbbb kifog^s 
a kbnyvvel szemben. Hiszen a gyanutlan 
olvasb, ha nem riad vissza a komoFykodb 
cimtbl, 6s belelapoz a kbnyvbe - vagy aka> 
csak a hatlapon kiemelt alcimeket futja £t - 
nem jbn ra\ hogy a kbtet az otthoni, amatbr 
programozbknak szbl. nem a szSmft6$techni- 
kai szakembereknek. Visszateszi a kbnyvet a 
polcra - pedig hasznos olvasm6ny lenne. 
Sz6kely Laszlb szerk.: Sinclair Spectrum 
jat6k 6s program - LSI ATSZ, 248 o., 
194 Ft. 

A Spectrum az egyetlen a Magyarorsz£gon 
elterjedt mikrog6pek kbzul, amely teljes joggaJ 
jdt6kg6pnek nevezhetb. Bar a C 64 is ilyen 
c6llal kerult kifejleszt6sre - j6t6kprogram- 
eliatottsaga jobb is de a legsikeresebb 
Commodore-g6p egy6b, szakmai c6lu szoft- 
verkinalata is hatalmas, fgy v^llalatoknil, in- 
t6zm6nyekn6l is sz6les kbrben hasznalatos. 
A tobbi mikrog6p pedig fbleg az iskolai ok- 
tat^sban kap szerepet. 

A Spectrumra Irt programok j4t6kjelleg6nek 
- illetve a m6s c6lu szoftverek szinte teljes 
hi6ny6nak - kbszbnhetb, hogy a g6p fbfel- 
haszn^l^si kbre a 10-16 6vesek koroszt^lya. 
Legtbbbjuk ha egy-k6t 6vig haszn^lja g6p6t, 
eljut arra a sztntre, hogy nem m^sol 6t 
kritika n6lkul minden j^t6kot. Azokat a szoft- 
vereket kezdi 6rt6ke'ni, amelyekben van va- 
lamilyen uj btlet, amelyek m^sok, mint a 
hagyom^nyos urhdboruk, amelyeknek sz6p a 
grafik6ja 6s a hangja. Programozgat BASIC- 
ben. 6s keresi az egyszeru felhaszn6lbi prog- 
ramokat - BAStC-bCvft6seket. szovegszer- 
kesztbket, rajzofbprogramokat. 
Az a j6t6k-, illetve efemi seg6dprogram vi- 
szont, amely nyujt valami ujat, nem biztos, 
hogy rbgtbn a betblt6s ut6n meg6rthet<5, a 
billentyuzettel vagy a joystrckkel kfs6rletezve. 
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Otv&satnk eszrevete/et atapfan kozotfuk tapunk f985 nouember 28 ft 79 , Sti 
niaban meg/etent PRIMQ hiltentyutablazat kn*gesziteset 

Az eredeti labtazatban sz#repettf>k a CIR- , es a Shift 1 , vaz4rm btflentyukkat 

egy gombnyomassal magadhato kulcsszayak. Most megad/uk a , - az ABC 

vatamatyik bat&t&nak egyuttes m &tjn yon tasavat eferhetb kutcuzavaka* 

>a - COS ,g CVS in - M«D 6 u VAL 

t b - StN ,h CVD ,o - CfNT - ASC 

.e - TAN J EOF { p - CSNG >w - CHRl 

id - ATN J - LOC * t g - CD8L t x LEFTS 

. e? PEEK ,k - EOF r r FIX „v - RIGHT* 

10} — EKP fi - MKt$ .s LEN - MtD s 

J - CVf ym AfftS? pf - 

A mint az a tahtazatbot I a that 6. it f rnjkt a tovabbfajJesztast szatgalo utas*ta$ok 
kulcszavai is megtaialhatok 

Nehany o/ya$6nk fefht vta a. frgy&tmunkat, hogy n&gy bidentytihoz tart&zo Jtutcs 
stot nem nrf tank fjieq Ezek a knyefkerok 

CTR-. BREAK -FOR CTR+^CLS -LET 

CTR-. RETURN GOTO CTR* . " SPACE -OUT 

Ezek a bilfentyOk a SHfFT + H yezertdkaraktemk hat a Sara is ugyanezt a kddot 

adfak. 

Qrbmmel ofvastam a BIT LET ma/vsi szamabun a JVC vail at as at Leuetpmben 
nem a vaffatAsboz ^ze ret nek hozzasxdtnL hanvm a geppet kapcsotatban Tnf- 
meruit prob/emaimhoi segitstiget k&rm 

KSt 4ve tsmarkedtem mag a BASIC nyelyvet, es korulbehtt egy e-ve a Z80 gepi 
kddj£vat Et&zoakban mar hosszabb-rovidebb idetg dotgdzt^m ZX81< HT IQBOZ, 
vatamint ZX S poet rum gep&k&n. Mindharom gepet eyytir&nt programoziam 
BASIC e$ assembly ny&tven. A TVC gep BAStC nveivu programazasa oem esett 
nehaztimre, de a yepf kudrot tutt nwg&ttapftasuk mar az &iso proba/kozasomnat 
betgazoiodott EzzbJ kapcsoiatban i&rm^nek k^rdeseftti : 

1 JM^kprogrjtmoknaf alengeo'heteiten a botk0rmany atkaimazasa. Mityert tt- 
pttsu botkormany hasznalhat6 r es me/y/k portfdJ olvashato te a ket kufsd bat- 
k or many? 

J? Az atabbf programmitt szerattum votna egy b yte-ot mttg/el&ftttem a kSpernyon 
Stkert&famjf Ksram /avtrsak azt kt r tfj magyararzak meg mrert nem miikodik 
tQ GRAPHLCS t§ 
75 POKE 33.0 POKE 34,32 

70 FOR A-Q TO t4:READ B ;POKE 8IB2 + A.BNEXT A 
25 DA TA 1 18,50, T. 12B.S&.2. 128.50,3. 12&2&1 

30 EX 1 0 

35 IF WK£ Y S THEN GOTO 35 

40 LIST 

A gapi kod mnemomkja LB A, 255 

ID {8000}. A 
ID {8Q0T),A 
LD (3002} r A 
LD (80Q3KA 
RET 

3 SzarBtn&k egy &gy$£&rfi szin xe t iza torprograma t trnf Ehhez fennc szuksegem 
a hang gapt kodo prografnozasdra. y a/am in t ampiif u dp szabafYOzasra, 

4 Utofsd kertisttm. Csak gepi ikodit programut. hogyati mvttihetek ki kazattara / 

E tor a is kdszonbm xegits&gukBt. as varom a tap ban mt*g/uitino TVCvef kapcso- 
tatos cikkeket, programokat 

Papp Tam^s, 5800 Bekescsaha, Tanarskozlarsasag tit 24 28 f f4 
1. A TVC-hesj Videoton gy£rtmMyiJ. ^alominT oundefi Kemps^on kompatibiiii 
botkormsny has£ndthal6 A kot botkormanyr^k nines kulon poff-ja. uyy olv^i^ 
hatdk le mint a hrll^ntyuk; IN K EY ^ GET ulaiiif dssal. 

2 A yepi kodu program vari Ered menyfti az. aliTbhj 8 AS EC sor adj^ : 
10 GRAPHICS 4 FOR I -491 TO 491 55 POKE 1 255 NEXT I 

A tovabbiakfta/ a TVC roi sz6\6 augusztusl szamunkban elkejidett cikkspro^at 
ad sr.oitseqst 

3 A BASK: hen hazznth SOUND utasitas g«pi kddu rrifegfdeltije : 

LD &.DUFIATIOW 
LD C VOLUME 
LD DE, PITCH 
RST 30h 
DEFB 33h 

Bovebbet a kovelk^f 6 szamokban megjeland TVC-fdt szolb cikkak fnynak ko- 
Jtolni. 

4. A ka/etta rutmok leirasst is a TVC rol szotb cikkek HozUk. 

Ofl/C 7 -h&z jatck- e$ atka/maza, pragramokat keresek. Mi vet a g&p wegfeheto- 
sen ritka Magyar prszagan. xzottv&rt szareznt szinte fshetetten Mentsegemra 
szotgatj&n hpgv amikor 198$ efftjeti iondnnban magyaitnm. rmig nam feh&tctt 
tudtu. bogy a ceg tonkremagy as n£m s/keruf a Sinclair Spectrum nyomaba 
eradrtie flgy hat a Sinclair szegodatt az QRJC nyomaba mar am f a tonkremenest 
i Met* A sierk } A BIT LET es oiyasdi at u tot so remeny 
Horvatn Gabor 1053 Budapest Bnkanyt Dezso u. tS, Tel.: tf5 348 



E programok kal6zmasolatok uti^n terjednek, 
leir^s n^lkuL Emiatt (volna) alapmu az LSf 
ATSZ uj kiadvanya, mely szamos Spectrum- 
j^tekot es -segedprogramot ir le. 
Volna, mert annak ellenere, hogy - egy ro- 
vid, bevezet6 fejezet utan - a m^sodik r^sz 
lexikonja ezeregy ]^t6kot sorof fel es oszta- 
lyoz minos^ge szennt, a harmadik fejezetben 
sok olyan program kerul tbbb£-kevesbe r^sz- 
letes bemutatasra, melynek osztatyzata har- 
mas vagy n^gyes; es kimarad szamos, otos 
minositest elert, igazan jo jatek. 
Az oszt^lyozas, persze, egy-egy program tu- 
lajdons^gainak a"tlagat tukrozi, tartalmazhatja 
az ujszeruseg, a konnyu kezelhetflseg. a \6 
grafika egyuttes ertekeles6t. A r^szletes is- 
mertetesre va!6 kivalasztasszempontjai viszont 
ezt ligyelembe veve is megk^rdojelezhetoek: 
helyet kapott itt sok. egymastdl alig kulon- 
bozo, es semmif^le leirast nem igenylo" jat^k 
is. Raadasul az ismertet^sek szinvonala is 
meglehetCsen elter<3. Nemelyiken erzddik. 
hogy iroja sokat probSlgatta az adott prog- 
ramot, alaposan kiismerte, igy taktikai tana- 
csokac is tud adni - masok pedig mintha a 
gyari fefras tomoritett nyersfordit^sai lenne- 
nek. 

Jo, hogy a jat^klexikon -lefrasok a kotet 
fel terjedelm^t sem teszik ki, Ami igazan er- 
tekes e konyvben, az ezutan kovetkezik. 
M6g a j^tekoknal maradva: nagyon hasznos 
a HURG c. jatekkeszito program referencia- 
szintu leirasa a harmadik fejezet folytatasa- 
ban. A kezdo felhaszn^lo is meg6rtr r hogyan 
kell akci6jat^kot irni - de nem ez a legfonto- 
sabb. Megtanul valamit abbo! is, hogy hogyan 
epul fel egy tobb r6szfunkci6t tel jesi t<5 prog- 
ram, hogy mil jelent a menutechnika. £s ha 
ezt atlatja, k^pes lesz annak felismer^sere is, 
hogy melyik program az, amelyik t^nyleg 
tartalmaz valamilyen ujdons^got, melyik 
a r^gebbjek sabtonos variacioja. 
A negyedik fejezet bevezetesekent ket, jo I 
hasznalhato rutin list^ja: ketcsatorn^s hang- 
generator es spritekezelo. A hanggener^tor 
tenyleg erdekes hatasokra kepes - rengeteg 
kiserletezes es gyakorlas ut^n. A spritekezelo 
feirasa egyertelmu - de hianyzik a gepi k6du 
resz assemblerlistaja. neh^z a hosszti DATA- 
sorok hibatlan begepelese 
Ezutan elterjedt, de leiras hianyaban ki nem 
hasznalt segedprogramok ismertetesei kovet- 
keznek - grafika, BASIC-bovftesek. a gepi 
k6du programozast kbnnyito programok. 
Nemelyik bo Jere eresztett, masok szuk- 
szavuak, de tenyleg ezek a legelterjedtebbek. 
A BETA BASIC 3.0 (legterjedelmesebb be- 
mutat^s) pedig Spectrum-viszonyiatban va- 
loban csodakra kepes A ..The Artist' szin- 
ten - csakhogy itt eppen a program lenyeget 
jelento foliafunkcio szerepe nines kelloen 
hangsulyozva. 

Az utolso fejezet egy adatnyifvantarto prog- 
ram kesziteset mutatja be. Peldakent a 
Forma I. futamok adatait kezeli, de persze 
hasznalhato masra is. A leiras f<5 er^nye, hogy 
tudatositja a kezdo felhaszncilovai: a prog- 
ramirast nem lehet elozetes tervezes nelkul 
elkezdeni. Maga a program nem kepes tul 
sokra, hiszen a BASIC es a Spectrum sem 
igazan alkalmas ilyen feladatok elfatasara. 
A fenntartasok ellenere is hianypotJo a kotet. 
Sok felhasznald szamara ez lehet az egyetlen 
roiras, ahonnan a programjainak kezelesehez 
szukseges informaciokat megszerezheti. A 
szerkeszto es a szerzok sokat valtoztattak a 
konyv elodjehez (1001 jatek es Graphics 
BASIC C 64-re) kepest, ami e kotet elonyere 
valt. Kiegyensulyozottabb szerkezettel, ke- 
vesbe otletszeru programvalogatassal a so- 
rozat kovetkezo darabja tenyleg tbk^letesen 
hasznalhato lesz - de hoi az a harmadik, 
ennyire elterjedt geptipus, amelyrol az a 
konyv szolhat? Taller J6zsef 
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1. *brn 



2. dbra 



3. 6bra 



f. ftttdtt mstjok/its* . k ti ve t ka z te t n 
sginkel, lehai mmdffot. emit ludurik 
az ABC kis betGrvel fogjuk megje- 
lolni, 6s k6s5bb igy hivatkozhatunk 
rajuk. 

Az afapfeftav4sekt>8l : 

a) 0 = 0, tehat mas betG nem je- 
lenthet 0-t. 

b) I - C < R, a emiatt +a) miatt 

2< =C =8. 

Az egyenlds6get atrendezve, az 
A=A egyenlfis6gat as a)-t felhasz- 
nalva, valamint mindket oldalr6l 
R-at as 100*l-t kivonva kapjuk. 

c) PAPI0+R0+C16=AP0SZ + SZE0. 
Azonnal latszik. hogy d) Z=6, 
s ezutan mindket oldalbdl 6-ot ki- 
vonva, majd 10-zal elosztva kapjuk 
az egyizerObb: 

e) PAPI + R + C1=AP0S + S6E egyen- 
I6s6get. 

Jelolje raz oaszeget, tehat a) b6r- 
melyikoldalat. Rogton Idthatd, hogy 
1' el*6 jegye vagy P, vagy P + 1. de 
ekkor szuks6gk6ppen A = 9. Azon- 
ban ekkor P=8~nak keflene lennie. 



s fgy a jobb oldal szerint r >9800< 
de ezt a bal oldalon nem lehet eldr- 
ni. Tehat els6 jegye P, s ez a jobb 
otdalon (P^AI) csak ugy teljeaul- 
het r ha 

f) P = A + 1. Ezutan teh6t P-t nem 
hasznalunk, megjegyezziik, hogy 

g) ha A valamrfyen 6rt6ket felvesz, 
akkor a tobbi betQnek nemcsak ezt, 
hanem az eggyel nagyobb 6rt6ket 
is el kell kerulni. S ebbdl 6a e)-b6l 
d)-b6l kovetkezik, hogy h) 1< = 
A =8 6s A^5, A*6. 

Most fejtsuk ki az e) egyenlfiseget. 

tudvan, hogy Cl-gyel a 10#C+1 

szamot jeldltuk stb. Hasznaljuk fel 

f)-et, majd rendezziik &t: 

i) 10#A+10#C+l + R + 86i =101 #S + 

E. Innen rogton lathatd, hogy 

)) S=9. ugyania S<=8 eseten 

101*S + E<=817<=851. 

Ezutan i) es j) alepjan: k) 10*A+ 

10*C + I + R = 58+E. 

a) es j) miatt 1^E<=8. ezert f) 

69^ = 58+E< =66. 

Innen rogton kapjuk, hogy m) 

5<=A + C<=6. 

ElSszor nezziik az A+C = 5 esetetl 
Ekkor k) 6s I) miatt n) l + R < =9. 
A = 5 h) miatt, A =4 b) miatt nem 



lehet. Ha A=3 lenne, akkor C = 2, 
s ezdrt b) miatt 1=1, igy n) miatt 
R-8es E=1. azaz E = I, ellentmondas. 
A=2 eset6n C = 3, s ez g)-nek mond 
silent. Vegiil A=1 eseten C=4, 
s mivef a) es g) miatt 0. 1, 2 foglalt, 
ezdrt I = 3, s igy a fegkisebb szabad 
6rtek 6, tehat E^-5; viszont ekkor 
58 + =63. ezdrt R - =10, ami ie- 
hetetlen, mivel R szamjegy. 
Tehat csakia o) A+C=6 lehet. h} 
miatt A^5. Ha A=4, akkor C = 2, 
ezert 1=1, I) miatt p) l+R< =6. 
Igy 0, 1, 2. 4, 5 fogfattsaga miatt 
R = 3, de ekkor E=6, azaz E=Z lenne, 
ellentmondas. A=3 eseten C=3 r 
azaz C=A lenne. b) 6s p), valamint 
d) miatt R<=6 es C<==4, igy A=1 
sem lehet. Maradt az utotsd lehe- 
tfisdg g) A = 2, s igy r) P = 3. Ekkor 
s) C-4, s igy az eldzdek miatt 
t) R=5, es u) 1=1. Ekkor v) E=8, 
s Igy megkaptuk az egyetlen lehet - 
edges megolddst: 32315+150 — 
-9685+416=231 96. 
2. feladat magotdSsa: 
Legyen Masodik atrategiAja a ko- 
vetkezo: Miutan Kezdfl lerakta 
elso jel6t, 0 rakjon 2 jelet egy meg 
urea sorba ugy. hogy egyik se le- 



gyeri m K«7d6 jmI4wbI egy ojzlopban j 
(1 , ibral Ezutflji KetdA larakjia vaJ*^ 
hovi K matDfJJk |efet. m&jcJ Misa- 
dik rakjon megint Mi j« let agy ur^» 
sorbs (addip maxirn urn 3 foglstt 
*or wan)f iigy, hofly p^lei uz eddig 
l?rakott k*l jslevel »zonos oszlopbn 
kflrnljsn^k. [2 6bra) Ekkor 4 H "vo- 
nal" van, melyben Maaodiknak 
2-2 jele talalhat6. s ezekb6l maxi- 
mum 1 vonalban van mar KezdGnek 
is jele. (Igy csinaltuk - egyszerfl 
vegiggondolnt vagy -pr6balgatni)- 
KezdO a kovetkezo I6pesben maxi- 
mum m6g egy ..vonaiat" tud el- 
rontani, tehAt legalabb kettA sza- 
badon marad. igy MAsodik a 3. 
I6peaevel mindkdt szabad vonalra 
rakbai 1-1 jelet |3 Sbra). a Igy kez- 
dfl bdrmilyen valaszirp (mlwet ez a 
4. lepei. ezArt Kezdfi nam nyarbvt) 
ki t iid ja aeAiziteni va tamely Ik ,, vo- 
nalban" a Jala I szirnet 5 -re. ■ igy 
mindenkfeppen ny«r. KdntiyO vt- 
gigQondolm, hogy hg- keido Jot Jai- 
szik, aJikor Maaadik ■ 3. ?ep&*pirbaci 
m£g nam nyerhei, igy ez a legjobb 
4lrat6gia, vagy FegslAbbJ* egy a l#g- 
jobb t [rdtagiAk kozuL 



harmad 

nyerd 
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Af Opfirftncis^ lenrjar'flfi van 
sziget, BIT-LET, ahol bitek 6s Eetek 
61 nek A bitek 6s letek nem keve- 
rednek, kulon vdrosokben elnek. 
de a bit 6s a let varosok Idtszatra 
teljesan egyform6k. A bit vfirosok 
kozott is 6s a let v6rosok kozott is 
nagy verse ng 6s folyik, ez6rt egy bit 
v6ros lakdja ki nem 6llhatja m6s bit 
vflrosok lakdit, s hasonl6an egy let 
se birja elviselni mas v6rosban lako 
let t6rsas6g6t, azonban bitek a le- 
tekkel j6ban vannak (annak ellen6re 
- vagy 6ppen azert ? hogy nem 
keverednek egym6ssal). A v6rosok 
kozott vannak rendszeres repulA- 
j6ratok. de az eddigieknek meg- 
felelfien csakis bit v£rosbol let vfi- 
rosba vagy let v6rosbol bit v6rosba 
az6llnak repul5k, kit bit vagy k6t 
let varos kozott elk6pzelhetetlen 
repu16jirat. 

Commod6ria meg akarja tamadni 
BITLET-et, ez6rt repiilfis felderftfi- 
ket kuldott ki. Feladatuk, hogy 



cm- 




megrajzolj6k az orszig t6rk6p6t, 
s hogy bejel 61 j6k: melyek a bit, 
6s melyek a let v6rosok. Ez ut6bbi 
az6rt fontos, mart a biteket a com- 
mokkal, a leteket a dorokkal lehet 
elk6bltani, azonban ha a biteket 
akarj6k dorokkal vagy a letekat 
commokkal legydzni, akkor azok 
legyfizhetetlenne valnak. 
A felderitfik nem szallhatnak le, igy 
csak a reput6jaratokat figyelhetik 
meg, ezenkivul egy besug6t6l meg- 
tudtak, hogy a ffivdrost, mely k6t- 
szer akkora. mint a tobbi varos, 
bitek Iakj6k. A felderitfik egy, az 
alabbihoz hasonl6 vazlatot kuldtek 
el Commod6ria F6sz6mft6g6p6nek, 
hogy az meg6IIapitsa: melyek a 
bit, 6s melyek a let v6rosok. A raj- 
zon a vonalak k6t v6ros kozott a 
rendszeres repul£j6ratokat jelentik. 
Segitsunk Commoddria F&progra- 
mozoj6nakl Tervezzunk meg egy 
adatstruktur6t, mely segfts6g6vel el 
lehet tarolni a felderltdk adatait 
(mely az Abrahoz hasonld, de sok- 
kal tobb varos t 6s jaratot is tartal- 
mazhatl). s adjunk meg egy algo- 
ritmust, mely segits6g6vel min6l 
gyorsabban meg tudja majd a g6p 
illapitani, hogy melyek a bit, 6s 
melyek a let varosok, 
Az algoritmus szOrje ki azt az ese- 
tet, amikor az adatok nyilv6n hib6- 
sak (tehdt nem lehet a v6rosokat 
2 osztalyba osztani ugy, hogy egy 
oszt6lyon beluli k6t v6ros kozott ne 
menjen reptilfij6rat), s azt az esetet 
is, amikor az adatok hidnyosak, 
azaz nem lehet minden v6rosr6l 



eldonteni e milyens6g6t. Azonban 
ekkor is azokrdt a v6rosokr6l, me- 
lyekrOI el tudja donteni, hogy bit 
vagy let v6rosok-e, ezt kdzdlje. 
Commoddria Ffisz6mit6g6p6rdl 
csak azt lehet tudni, hogy hasonld 
elven mGkddik az 6ltalunk ismert 
g6pekhez, a programoz6sa etdttunk 
ismeretlen, Igy az algoritmust szd- 



elrva kArjuk t Vegiil a viro- 
aak nzumnnek f N 1 6* ■ jlretofc sza 
rtiAfiak (M) Ltmeretiben hat6roz- 
zuk meg a merndflaiginyt d* az al- 
gorltmusiink I6p6tftxim4r ia| Az e 
fd iFgarilrrtus, mely nigy K-tm is 
kdrulbe^ul N + rtegysigi] M 
6rt6kre a lagfcavaaabb I6p6aben 
olrijn meg a feladaLct (atJagosjn, 
■ It. b legroesxabb esetbenl. 
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